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FOREWORD 


Among  the  responsibilities  assigned  to  the  Office  of  the  Manager,  National 
Communications  System,  is  the  management  of  the  Federal  Telecommunication 
Standards  Program  which  is  an  element  of  the  overall  GSA  Federal 
Standardization  Program.  Under  this  program,  the  NCS,  with  the  assistance  of 
the  Federal  Telecommunication  Standards  Committee  identifies,  develops,  and 
coordinates  proposed  Federal  Standards  which  either  contribute  to  the 
interoperabi 1 ity  of  functionally  similar  Federal  telecommunication  systems  or 
to  the  achievement  of  a  compatible  and  efficient  interface  between  computer 
and  telecommunication  systems.  In  developing  and  coordinating  these  standards 
a  considerable  amount  of  effort  is  expended  in  initiating  and  pursuing  joint 
standards  development  efforts  with  appropriate  technical  committees  of  the 
Electronic  Industries  Association,  the  American  National  Standards  Institute, 
the  International  Organization  for  Standardization,  and  the  International 
Telegraph  and  Telephone  Consultative  Committee  of  the  International 
Telecommunication  Union.  This  Technical  Information  Bulletin  presents  an 
overview  of  an  effort  which  is  contributing  to  the  development  of  compatible 
Federal,  national,  and  international  standards  in  the  area  of  digital 
facsimile  standards.  It  has  been  prepared  to  inform  interested  Federal 
activities  of  the  progress  of  these  efforts.  Any  comments,  inputs  or 
statements  of  requirements  which  could  assist  in  the  advancement  of  this  work 
are  welcome  and  should  be  addressed  to: 

Office  of  the  Manager 
National  Communications  System 
ATTN:  NCS-TS 
Washington,  D.C.  20305 
(202)  692-2124 
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1 .0  INTRODUCTION 


Members  of  the  CCITT  XIV  COM  Study  Group  met  in  Geneva  in  May  1980 
to  finalize  a  standard  two-dimensional  code  for  the  Group  3  facsimile 
apparatus.  A  standard  known  as  the  Modified  READ  code  was  chosen  and 
is  described  in  Section  U.2  of  Appendix  A.  The  National  Communication  System, 
an  organization  of  the  U.  S.  Government,  awarded  a  contract  (Purchase 
Order  DCA  100-80- "M-0145)  to  Delta  Information  Systems,  Inc.  to  measure 
the  compression  and  error  sensitivity  of  the  Modified  READ  code.  This 
document  is  the  final  report  summarizing  the  work  performed  under  this 
study.  This  work  is  a  logical  continuation  of  three  prior  investigations 
(see  References  3,  6,  12)  of  facsimile  coding  techniques  performed  by 
Delta  Information  for  the  National  Communication  System. 

The  measurement  parameters  which  were  involved  in  the  investigation 
are  summarized  in  Section  2.0  of  this  report.  Section  3.0  describes  the 
overall  simulation  process  and  hierarchal  structure  of  the  Modified  READ 
computer  program.  One  of  the  more  important  aspects  of  this  study  is  the 
simulation  of  the  Modified  READ  coding  algorithm  in  the  presence  of  noise. 

For  the  simulation  to  be  complete  it  is  necessary  to  fully  define  the 
operation  of  the  decoder  when  an  error  occurs.  This  error  processing 
function  is  described  in  Section  h.O.  The  Modified  READ  computer  program 
was  run  on  the  Computer  Facility  at  the  Defense  Communications  Engineering 
Center  in  Reston,  Virginia.  A  total  of  twenty- two  runs  were  made  on  the 
computer  at  different  combinations  of  CCITT  document  number,  resolution, 
K-factor,  minimum  scan  line  time,  error  phase,  and  transmission  error  file. 
Section  5.0  summarizes  the  results  of  these  simulation  runs.  In  several 
instances  the  test  results  are  compared  with  the  results  of  previous  sim¬ 
ulations  of  one  dimensional  and  two  dimensional  coding  techniques. 


Appendices  B  and  C  contain  the  flow  charts  and  code  listing  for  the 
Modified  READ  code  prepared  on  this  program. 

Delta  Information  Systems  wishes  to  acknowledge  the  Contracting 
Officer's  Technical  Representative,  Dennis  Bodson,  for  the  support  he 
has  provided  during  the  course  of  this  contract.  The  assistance  of  Marla 
Thomas,  from  the  DCEC  computer  facility,  is  also  greatly  appreciated. 
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2.0  MEASUREMENT  PARAMETERS 

In  this  section,  the  various  parameters  involved  in  the  measurement 
of  compression  and  error  sensitivity  will  be  summarized.  In  general. 
Study  Group  HV  of  the  CCITT  agreed  upon  these  measurement  parameters 
at  the  general  meeting  held  in  Geneva  in  December  1978  (see  Reference  2) 

2.1  Test  Documents 

The  test  documents  were  chosen  from  the  eight  CCITT  test  documents 
(see  Figure  2-1)  since  they  have  been  widely  used  by  data  compression 
experimenters  in  the  past.  Documents  numbered  1,  U,  5,  and  7  (see 
Figures  2-2,  2-3,  2-U,  and  2-5  respectively)  were  selected  as  the 
standard  test  images  since  these  were  considered  most  representa¬ 
tive  of  documents  to  be  transmitted. 

The  French  PTT  Administration  has  scanned  the  eight  CCITT  documents 
at  the  high  resolution  specified  for  Group  3  machines— 7.7  lines/mm. 

They  have  also  quantized  each  pel  to  be  either  black  or  white  and 
stored  the  resultant  image  on  magnetic  tape.  This  tape  was  used  as 
the  source  of  input  documents  in  this  simulation  program.  Appendix  B 
of  Reference  3  describes  the  format  of  the  test  document  magnetic  tape 
supplied  by  the  French  PIT. 

2.2  Resolution 

It  was  agreed  that  measurements  would  be  performed  at  both 
standard  resolution  (3.85  lines/mm.)  and  high  resolution  (7.7  lines/mm.) 
In  the  high  resolution  case,  all  lines  on  the  input  test  documents 
shall  be  used.  In  standard  resolution  tests,  every  odd  scan  line 
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Standard  Taat  Documents 


THE  SLEREXE  COMPANY  LIMITED 

SAPORS  LANE  •  BOOLE  ■  DORSET  •  BH23  8  ER 
TELETHON!  HOU  (945  13)  51617  •  TBMX  123456 


Our  Ref.  350/PJC/EAC 


18th  January,  1972. 


Dr.  P.N.  Cundall, 
Mining  Surveys  Ltd., 
Holroyd  Road, 
Reading, 

Berks . 


Dear  Pete, 

Permit  me  to  introduce  you  to  the  facility  of  facsimile 
transmission. 

In  facsimile  a  photocell  is  caused  to  perform  a  raster  scan  over 
the  subject  copy.  The  variations  of  print  density  on  the  document 
cause  the  photocell  to  generate  an  analogous  electrical  video  signal. 
This  signal  is  used  to  modulate  a  carrier,  which  is  transmitted  to  a 
remote  destination  over  a  radio  or  cable  communications  link. 

At  the  remote  terminal,  demodulation  reconstructs  the  video 
signal,  which  is  used  to  modulate  the  density  of  print  produced  by  a 
printing  device.  This  device  is  scanning  in  a  raster  scan  synchronised 
with  that  at  the  transmitting  terminal.  As  a  result,  a  facsimile 
copy  of  the  subject  document  is  produced. 

Probably  you  have  uses  for  this  facility  in  your  organisation. 

Yours  sincerely, 

fJd. 

P.J.  CROSS 

Group  Leader  -  Facsimile  Research 


Figure  2-2  CCITT  Test  Document  No.  1 


Xafiatartd  ia  Enfiand:  No.  2006 

lUfiotorod  Office:  *0  Vicar*  Lana.  Ilford.  Eaaas. 


L'ordrede  lancement  et  de  realisation  des  applications  fait  l'objet  de  decisions  au  plus  t  aut 
niveau  de  la  Direction  Generate  des  Telecommunications.  U  n'est  certes  pas  question  ds 
construirece  systeme  integre  "en  bloc"  mais  bien  au  contraire  de  proceder  par  etapes,  par 
paliere  successifs.  Certaines  applications,  dont  la  rentabilite  ne  pourra  etre  assure*,  ne 
seront  pas  entreprises.  Actuellement,  sur  trente  applications  qui  ont  pu  etre  globalement 
definies,  sixen  sont  au  stade  de  l’exploitation,  six  autres  se  sont  vu  donner  la  priorite  pour 
leur  realisation. 

Chaque  application  est  confiee  4  un  "chef  de  projet",  responsable  successivement  de  sa 
conception,  de  son  analyse-programmation  et  de  sa  mise  en  oeuvre  dans  une  region-pilote. 
La  generalisation  ulterieure  de  l'application  realisee  dans  cette  region-pilote  depend  des 
resultats  obtenus  et  fait  l'objet  d'une  decision  de  la  Direction  Generate.  N6anmoins,  le 
chef  de  projet  doit  des  le  depart  considerer  que  sun  activite  a  une  vocation  nationale  done 
refuser  tout  particularisms  regional.  U  est  aide  d'une  equipe  d'analystes-programmeurs 
et  entoure  d'un  "groupe  de  conception"  charge  de  rediger  le  document  de  "definition  des 
objectifs  globaux"  puis  le  "cahier  des  charges"  de  l'application,  qui  sont  adressds  pour  avis 
i  tous  les  services  utilisateurs  potentiels  et  aux  chefs  de  projet  des  autres  applications. 
Le  groupe  de  conception  comprend  6  4  10  per sonnes  representant  les  services  les  plus 
divers  concernes  par  le  projet, et  comporte  obligatoirement  un  bon  analyste  attach*  4  l'ap¬ 
plication. 

n  -  L'IMPLANTATION  GEOGRAPHIQUE  D'UN  RESEA U  INFORMATIQUE  PERFORMANT 

L 'organisation  de  l'entreprise  franqaise  des  telecommunications  repose  sur  l'existence  de 
20  regions.  Des  calculateurs  ont  ete  implantes  dans  le  passe  au  moins  dans  toutes  les  plus 
importantes.  Ontrouve  ainsi  des  machines  Bull  Gamma  30  4  Lyon  et  Marseille,  des  GE  425 
4  Lille,  Bordeaux,  Toulouse  et  Montpellier,  un  GE  437  4  Massy,  enfin  quelques  machines 
Bull  300  TI  4  programmes  c4bies  etaient  recemment  ou  sont  encore  en  service  dans  les 
regions  de  Nancy,  Nantes,  Limoges,  Poitiers  et  Rouen  ;  ce  pare  est  essentiellement  utilise 
pour  la  comptabilite  t*l*phonique. 

Al'avenir,  si  la  plupart  des  fichiers  necessaires  aux  applications  decrites  plus  haut  peuvent 
•tre  geresen  temps  differ*,  un  certain  nombre  d'entre  eux  devront  necessairement  etre  ac- 
cessibles  voire  mis  4  jour  en  temps  reel  ;  psrmi  ces  derniers  le  fjehier  commercial  des 
abonnes,  le  fichier  des  rerrseignements,  le  fichier  de3  circuits,  le  fichier  technique  des 
abonn*s  contiendront  des  quantites  considerables  d'informations. 

L*  volume  total  de  caractfer’es  4  g*rer  en  phase  finale  sur  un  ordinateur  ayant  en  charge 
quelques  500  000  abonnes  a  ete  estim*  4  un  milliard  de  caracteres  au  moins.  Au  moins  le 
tiers  des  donnees  seront  concernees  par  des  traitements  en  temps  reel. 

Aucun  des  calculateurs  enumeres  plus  haut  ne  permettait  d'envisager  de  tels  traitements. 
L'integration  progressive  de  toutes  les  applications  suppose  la  creation  d'un  support  commun 
pour  toutes  les  informations,  une  veritable  "Banque  de  donnees",  repartie  sur  des  moyens 
detraitement  nationaux  et  rggionaux,  et  qui  devra  rester  alimentee,  mise  4  jour  en  perma¬ 
nence,  4  partir  de  la  base  de  l'entreprise,  c'est-4-dire  les  chantiers,  les  magasins.  les 
guichets  des  services  d'abonnement,  les  services  de  personnel  etc. 

L'etude  des  differents  fichiers  4  constituer  a  done  permis  de  dbfinir  les  principales  carac- 
teristiques  du  r*seau  d'ordinateurs  nouveaux  4  mettre  en  place  pour  aborder  la  realisation 
du  system*  informatif.  L'obligation  de  faire  appel  4  des  ordinateurs  de  troisifeme  generation, 
tr*s  puissants  et  dotes  de  volumineuses  memoires  de  masse,  a  conduit  4  en  rbduire  substan- 
tiellement  le  nombre. 

L'lmplantation  de  sept  centres  de  calcul  interrugionaux  constituera  un  compromis  entre  : 
d'une  part  le  d6sir  de  reduire  le  coQt  economique  de  1’ensemble,  de  faciliter  la  coordination 
des  equipes  d'informaticiens;  et  d'autre  part  le  refus  de  crcer  des  centres  trop  importants 
difficiles  4  g*rer  et  4  diriger.et  posant  des  probiemes  delieats  de  s*curitc.  Le  regroupe- 
ment  des  traitements  relatifs  4  plusieurs  regions  sur  chacun  de  ces  sept  centres  permettra 
d*  leur  donner  une  taille  relativement  homog*ne.  Chaque  centre  "gurera"  environ  un  mil¬ 
lion  d'abonn*s  4  la  fin  du  VI*me  Plan. 

La  mite  en  place  de  ces  centres  a  d*bute  au  d*but  de  l'annie  197  1  :  un  ordinateur  IRIS  30  de 
la  Compagnie  Internationale  pour  l'Informatique  a  install*  4  Toulouse  en  f*vrier  ;  la 
ro*me  machine  vient  d'etre  mise  en  service  au  centre  de  calcul  interregional  de  Bordeaux. 

Figure  2-3  CCITT  Test  Document  No.  U 
Photo  n®  1  -  Document  trfes  dense  lettre  1,  5mm  de  haut  - 

Restitution  photo  n®  9 
2-h 


Cel*  est  d’autant  plus  valable  que  T tkf  est  plus 
grand.  A  cet  tgard  la  figure  2  represents  la  vraie  courbe 
dormant  \<p(j)\  en  fonction  de / pour  les  valeurs  num4- 
riques  indiquees  page  precddente. 


Dans  ce  cas,  le  filtre  adapte  pourra  etre  constitue, 
conformiment  i  la  figure  3,  par  la  cascade  : 

—  d'un  filtre  passe-bande  de  transfer!  unite  pour 
/a  <  /  sJ/o  +  A/  «t  de  transfer!  quasi  nul  pour 
/  <  /„  et  /  >  /0  +  A  f  filtre  ne  modifiant  pas  la  phase 
des  composants  le  traversant  ; 
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—  filtre  suivi  d’une  ligne  a  retard  (LAR)  disper¬ 
sive  ayant  un  temps  de  propagation  de  groupe  T, 
decroissant  lineairement  avec  la  frequence  f  suivant 
I’expression  : 


7i +(/.-/)  77 

a; 


(avec  T0  >  T) 


(voir  fig.  4). 


telle  ligne  i  retard  est  donnec  par  : 

-2>tj^r»d 1/ 

Et  cette  phase  est  bien  I'oppose  de  I4U). 
a  un  ddphasage  constant  pres  (sans  importance] 
et  i  un  retard  T0  pres  (inevitable). 

Un  signal  utile  5(0  traversant  un  tel  filtre  adapts 
donne  a  la  sortie  (i  un  retard  T0  pres  et  &  un  depha- 
sage  pres  de  la  porteuse)  un  signal  dont  la  transformdc 
de  Fourier  est  reelle,  constante  entre  /„  et  /0  + Af] 
et  nulle  de  part  et  d'autre  de  /0  et  d t  f9  +  bf,  e’est- 
i-dire  un  signal  de  frequence  porteuse  f0  +  A/l2  el 
dont  I'enveloppe  a  la  forme  indiquee  k  la  figure  5, 
oil  l*on  a  represente  simultanement  le  signal  5(rj 
et  le  signal  5,(r)  correspondent  obtenu  k  la  sortie 
du  filtre  adapte.  On  comprend  le  nom  de  recepteui 
k  compression  d’impulsion  donne  i  ce  genre  dc 
filtre  adapte  :  la  «  largeur  »  (i  3  dB)  du  signal  corn- 
prime  etant  egaie  k  l/Af,  le  rapport  de  compression 
T 

est  de - a  TA/ 

I /A/ 


On  saisit  physiquement  le  phenomene  de  com 
pression  en  realisant  que  lorsque  le  signal  5(f)  entn 
dans  la  ligne  k  retard  (LAR)  la  frequence  qui  entri 
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should  be  used.  Figure  2-6  is  a  copy  of  the  French  PTT  Test  Document 
No.  scanned  with  7.7  lines/mm.  resolution.  Figure  2-7  is  a  copy 
of  the  same  document  where  the  even  scan  lines  have  been  replaced  with 
the  line  above.  Therefore,  this  represents  a  document  in  which  the 
vertical  resolution  is  3.85  lines/mm. 

2.3  Minimum  Scan  Line  Time  (MSLT) 

The  standard  MSLT  to  be  used  in  the  measurement  program  will  be 
5,  10,  and  20  ms.  with  SOL  ie  and  0  ms.  without  SOL- code.  It  was 
later  clarified  in  a  memo  from  the  chairman  of  the  Working  Committee 
(see  Reference  7)  that  if,  for  reasons  of  test  economy,  only  one  value 
of  MSLT  can  be  used  in  the  test  program,  that  value  shall  be  20  ms. 

2.U  Transmission  Bit  Rate 

The  standard  transmission  bit  rate  is  U800  bits/sec. 

2.5  Measurement  of  Compression 

Two  standard  measures  of  compression  have  been  established — 

(l)  number  of  coded  bits  (2)  Compression  Factor.  The  number  of 
coded  bits  is  the  number  of  bits  required  to  transmit  a  document, 
including  all  overhead  bits  such  as  End  of  Line  (EOL)  and  Fill  bits. 
The  Compression  Factor  is  computed  by  dividing  the  total  number  of 
picture  elements  (pels)  per  test  document  by  the  number  of  coded 
bits.  It  was  further  agreed  that  the  Compression  Factor  and  coded 
bits  should  be  computed  for  two  different  conditions — with  overhead 
and  without  overhead.  The  measurement  with  overhead  applies  to  the 


2-7 


L'ordrede  Uncement  et  de  realisation  dea  applications  fait  l'objet  de  decisions  au  plus  haul 
niveau  de  U  Direction  GSnSrale  des  Telecommunications.  D  n'est  certea  pas  question  de 
conatrulre  ce  system*  integrS  "en  bloc"  mala  bien  au  contralre  de  procSder  par  Stapes,  par 
palters  successes.  Certaines  applications,  dost  la  rentabilite  ne  pourra  Stre  assurde, * 
seront  pas  entreprlses.  Actuellement,  sur  trente  applications  qui  ant  pu  Stre  globelement 
dSfinies,  sixen  sont  au  stade  de  Sexploitation,  six  autres  se  sont  vu  donner  U  priorite  pour 
leur  realisation. 

Cheque  application  eat  confide  &  un  "chef  de  projet",  responsable  succesaivement  de  sa 
conception,  de  son  analyse -progr  animation  et  de  aa  mise  en  oeuvre  dans  une  region -pilote. 
La  generalisation  ultSrieure  de  l'application  realises  dans  cette  region-pilots  depend  dss 
rSsultats  obtenus  et  fait  l'objet  d'une  decision  de  U  Direction  Generals.  N eanmolns ,  le 
chef  de  projet  dolt  des  le  depart  considSrer  que  son  activlte  a  une  vocation  nationals  done 
refuser  tout  particular  if  me  regional.  H  eat  aide  d'une  equips  d 1  analystes-programmeurs 
et  entourd  d'un  "groups  de  conception"  charge  de  rediger  le  document  de  definition  des 
objectifa  globaux"  puis  le  "cahier  des  charges"  de  l'application,  qui  sont  adreasds  pour  avis 
a  tout  les  services  utilisateurs  potentiels  et  aux  chefs  de  projet  des  autres  applications. 
Le  groups  de  conception  comprend  6  k  10  per sonnes  represented  les  services  les  plus 
divers  concerns*  par  le  projet, et  comporte  obligatoirement  un  bon  analyete  attache  &  1' ap¬ 
plication. 

n  -  L'lMPLANTATION  GEOCRAPHIQUE  D’UN  RESEAU  DSfFORMATIQUE  PERFORMANT 

L 'organisation  de  l'entreprise  franqalse  dea  telecommunications  repose  eur  l'existence  de 
20  regions.  Des  calculateurs  out  StS  implsntes  dans  le  pesse  au  moins  dans  toutes  les  plus 
importantes.  Ontrouve  ainsi  des  machines  Dull  Gamma  30  1  Lyon  et  Marseille,  dea  GE  425 
a  Lille,  Bordeaux,  Toulouse  et  Montpellier,  un  GE  437  4  Massy,  enfln  quelques  machines 
Bull  300  T1  a  programmes  cables  etaient  recemment  ou  sont  encore  en  eervice  dene  les 
regions  de  Nancy.  Nantes,  Limogee,  Poitiers  et  Rouen  ;  ce  pare  est  easentieUement  utilise 
pour  la  comptabilite  teiephaniquc . 

Al'mvenir,  slim  plupert  dee  fichlers  necessalres  aux  applications  decrites  plus  haut  peuvent 
#tre  geres  en  temps  differ e,  un  certain  nombre  d'entre  eux  devront  necessairement  #tre  ac¬ 
cessible*,  voire  mis  a  jour  en  temps  reel  :  parmi  cee  derniers  le  fichier  commercial  dea 
abonnes,  le  fichier  dee  rensetgnements,  le  fichier  des  circuits,  le  fichier  technique  dea 
abounds  contiendront  des  quantites  considerables  d'informations. 

Le  volume  total  de  caracter'es  a  g erer  en  phase  finale  sur  un  ordinateur  ayant  en  charge 
quelques  500  000  abonnes  a  ete  estime  a  un  milliard  de  caracteres  au  moins.  Au  moins  le 
tiers  dee  dannees  seront  concern  des  par  des  traitements  en  temps  reel. 

Aucun  des  calculateurs  enumSre*  plus  haut  ns  permettait  d’envisager  de  tele  traitements. 
L'integration  progressive  de  toutes  les  applications  suppose  la  creation  d'un  support  commun 
pour  toutes  les  informations,  une  veritable  "Banque  de  donnees",  rSpartte  sur  des  moyens 
detraitement  nationaux  at  reglonaux,  et  qui  devra  raster  aliment ee.  mise  &  jour  en  perma¬ 
nence.  4  pertir  de  la  base  de  l'entreprise,  c'est-4-dire  les  chantiers,  les  magasins,  les 
guichets  des  services  d'sbonnement,  les  services  de  personnel  etc. 

L'etude  des  dlfferents  fichlers  &  consumer  a  done  permis  de  definir  les  principeles  carac- 
tSrlstlque*  du  rSseau  d'ordinateurs  nouveaux  4  mettre  en  place  pour  a  border  la  realisation 
du  system*  informs tif.  L'obligatjon  de  faire  appel  i  des  ordinateurs  de  troislSme  generation, 
trSs  puissant*  et  dotes  de  volu  mine  uses  mSmoirea  de  masse,  a  conduit  4  en  r  Mu  ire  substan- 
tlellement  le  nombre. 

L'lmplantatlon  de  sept  centres  de  calcul  Lnterreglonaux  constituera  un  compromis  entre  : 
d'une  part  le  deair  de  reduire  le  coot  Sconomique  de  l'ensemble,  de  facillter  la  coordination 
dea  Squipes  d'informaticiens;  et  d 'autre  part  le  refus  de  creer  des  centres  trop  important* 
dlfflciies  4  gerer  at  k  diriger.et  posant  des  probiemss  delieats  de  sScurltS.  Le  regroupe- 
ment  des  traitements  relatifs  k  plusieurs  regions  sur  chacun  de  ces  sept  centres  permettra 
de  leur  donner  une  taille  relatlvement  homogSne.  Cheque  centre  "gdrera"  environ  un  mil¬ 
lion  d' abonnes  4  la  fin  du  VIS  me  Plan. 

La  miae  en  place  de  ces  centres  a  debuts  au  debut  de  1'annSe  1 97 1  .  un  ordinateur  IRIS  50  de 
la  Compegnie  Internationale  pour  1'Informatique  a  ete  installs  4  Toulouae  en  fSvrier  ;  la 
m4 me  machine  vlent  d'etre  mise  en  service  au  centre  de  calcul  interregional  de  Bordeaux. 

Figure  2-6  Test  Document  Scanned/ppinted  7.7  lines/nm. 

Photo  n*  1  -  Document  trCs  dense  lettre  1, 5mm  de  haut  - 

Restitution  photo  ri*  9 
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L'ordrt  de  lancement  ft  da  realisation  das  appUcatlooa  fait  l'objet  da  decision*  au  plus  baut 
niveau  da  la  Direction  GAnArale  dee  Telecommunication*.  11  n'eat  certea  pa*  question  da 
conatruira  ca  systems  intAgr  A  "en  bloc"  mala  blan  au  eootraire  da  procAder  par  Atapes.  par 
pallara  aucoassi fa.  Certains*  application*,  dont  la  rentabllitA  na  pourra  Atra  aaaurAa,  m 
aeront  pas  entre prises.  Actuellamant,  *ur  trente  applications  qui  ant  pu  Atre  global* ment 
dAflniaa.  six  en  sont  au  atada  da  Sexploitation,  aix  autre*  ae  aont  vu  donnar  la  prioritA  pour 
leur  rAaliaation. 

Cheque  application  aat  conflAa  4  un  "chef  da  projet",  raaponaabla  auccaaaivcmcnt  da  sa 
conception,  da  son  analyse -pro gram  me  ti  on  at  da  sa  miaa  en  oeuvre  dans  une  region-pilots. 
La  gAnAralisation  ultAriaura  da  l'applicatlon  realises  dans  catta  rAgion- pilots  dApend  das 
rAaultats  obtanus  at  fait  l'objet  d'una  dAcision  da  la  Direction  GAnAraia.  NAanmolns,  la 
chef  da  projet  dolt  d4s  la  dApart  conaidArar  qua  son  activitA  a  una  vocation  nationals  done 
re bisar  toot  particular i s me  regional,  n  eat  aidA  d'una  equips  d'analystes-programmsurs 
at  antourA  d'un  "groups  da  conception"  cbargA  do  rAdlger  le  document  de  "dAflnition  dee 
objectifa  globaux"  pula  la  "cahiar  daa  charges"  de  l'applicatlon,  qui  sont  adraaaAs  pour  avia 
4  tons  lea  services  utiliaateura  potentials  at  aux  chafe  de  projet  dee  autree  applications. 
La  groups  da  conception  coraprend  6  4  10  per  tonne  a  reprAsentant  lea  services  lea  plus 
divers  ccncemAs  par  la  projatiat  comporte  obligatoireroent  un  bon  analyst*  attache  4  1‘ ap¬ 
plication. 

n  -  L'lMPLANTATICN  GEOCRAPHIQUE  D'UN  RESEAU  INFORMATIQUE  PERFORMANT 

L 'organisation  da  l'antraprlaa  fran^ais*  daa  telecommunications  repose  war  1' existence  da 
30  regions.  Des  calculateurs  ont  AtA  implantAs  dans  le  pasaA  au  moina  dana  toutas  las  plus 
Important* a.  On trouv*  alesl  das  machinas  Bull  Gamma  30  4  Lyon  et  Marseille,  dee  GE  425 
4  Lille,  Bordeaux,  Toulouse  et  Montpellier,  un  GE  437  4  Massy,  anfln  qualques  machinas 
Bull  300  T1  4  programmes  c4blAa  A  talent  rAcamment  ou  aont  encore  en  service  dans  las 
rAglona da  Nancy,  Nantaa,  Limoges,  Poitiers  at  Rouen  ;  ce  pare  eat  eesentlellement  utilise 
pour  la  comptabilitA  t AlAphonique . 

Al'avenir.  alia  pin  part  daa  fichlera  nAceasaires  aux  applications  dAcrltea  plus  haut  peuvent 
Atre  gArAaen  temps  differ  A,  un  certain  nombre  d 'entre  eux  devront  nAceaaalrement  Atre  ac- 
ceasibles,  voire  mis  4  jour  an  ttmpa  real  :  parml  caa  darniara  le  flehier  commercial  daa 
abonnAs,  la  flehier  daa  rarraalgnamants,  le  flehier  dee  circuits,  le  fichier  technique  daa 
abounds  contlendront  des  quantitAs  considerables  d'information*. 

La  volume  total  da  caractAi^s  4  gArer  en  phase  finale  aur  un  ordlnateur  ayant  en  charge 
qualques  500  000  abannAa  a  AtA  estimA  4  un  milliard  de  caractAres  au  moina.  Au  moina  la 
tiers  dea  doonAe*  aeront  concerns*  par  daa  traitamsnts  en  temps  rAal. 

Aucun  dea  calculateurs  AnumArAa  plus  haut  na  parmattait  d'enviaager  de  tela  traitamsnts. 
L'intAgration  progressive  da  tout* Hies  application*  suppose  1*  creation  d'un  support  commun 
pour  toute*  lee  informations,  une  vAritable  "Banque  de  donnAes”,  rApartie  *ur  de*  moyens 
detraitement  nationaux  et  rAgionaux,  et  qui  devra  raster  aliment  A* ,  ml**  4  jour  an  perma¬ 
nence,  4  partir  de  la  base  de  l'entrepriae,  c'ast-4-dire  les  chantiers,  le*  magasins,  lea 
guichet*  dea  services  d'abonnement,  les  servicea  de  personnel  etc. 

L’Atude  des  diifArents  flchiara  4  conatituer  a  done  permis  de  dAfinir  les  principalea  carac- 
tAriatiques  du  rAaeau  d'ordinateura  nouveaux  4  mettre  en  place  pour  aborder  la  rAaliaation 
du  ayatAme informatif.  L1  obligation  da  fairs  appel  4  des  ordinateurs  de  troisiAme  gAnAratlon, 
trAspuiaaantsetdotAadevolumineuaea  mAmoirea  de  maase.  a  conduit  4  en  rAduire  substan- 
tiallamant  le  nombre. 

L'lmplantation  de  sept  centres  de  calcul  interrAgionaux  constituera  un  compromla  entre  : 
d'un# partis  dAair  de  rAduire  le  coot  Aconomique  de  l'ensemble,  de  faciliter  la  coordination 
dea  Aqulpes  d'lnformatlelans;  et  d'autre  part  le  refus  de  crAer  des  centre*  trop  important* 
difficiiaa  4  gArer  et  4  diriger.et  poeant  des  problAmss  dAlicats  de  sAcuritA.  Lc  r*  groups - 
ment  des  traitements  relatifs  4  plusleurs  rAgion*  aur  chacun  de  ce*  sept  centre*  permettra 
de  leur  donnar  un*  talll*  relativement  homogAne.  Cheque  centre  "gArera”  environ  un  mil¬ 
lion  d'aboraiAa  4  la  fin  du  VIAme  Plan. 

La  miaa  an  place  de  ces  centres  a  dAbut  A  au  dAbut  de  1'annAe  197 1  :  un  ordlnateur  IRIS  50  d* 
la  Compagnia  Internationale  pour  l'lnformatique  a  AtA  installA  4  Toulouse  en  fAvrier  ;  la 
m*m#  machine  vient  d'Atre  mis*  en  service  au  centre  de  calcul  interrAgional  d*  Bordeaux. 

Figure  2-7  Tent  Document  Scanned  7  linen/ran.  Printed  3.85  lines /on. 
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Group  3  situation  while  the  measurement  without  overhead  applies  to 
the  Group  Li  case. 

2.6  Measurement  of  Error  Sensitivity 

An  objective  measure  of  error  sensitivity  is  obtained  by  encoding 
the  test  documents  with  the  proposed  techniques  (all  overhead  bits  must 
be  included),  subjecting  the  resulting  bit  stream  to  transmission 
errors,  decoding  the  transmission  to  obtain  the  received  image,  and 
comparing  the  original  image  with  the  received  image  to  determine  the 
number  of  pels  in  error.  The  Error  Sensitivity  Factor  (ESF)  is  cal¬ 
culated  as  the  total  number  of  document  pels  in  error  divided  by  the 
total  number  of  transmission  bits  that  are  in  error.  In  this  way, 
the  ESF  represents  the  average  disturbance  to  the  output  image  caused 
by  a  single  transmission  error. 

2.6.1  Transmission  Error  Pattern 

It  was  agreed  that  a  record  of  actual  bit  errors  incurred  over 
telephone  lines  will  be  used  in  the  error  sensitivity  test.  The 
Federal  Republic  of  Germany  (see  Reference  8)  has  obtained  a  record 
of  such  errors  by  transmitting  a  known  psuedo-random  sequence  at 
IiSOO  bits/sec.  using  a  727  ter  modem  over  a  switched  telephone  net¬ 
work.  The  resultant  error  pattern  has  been  recorded  on  magnetic  tape 
and  made  available  to  experimenters.  Appendix  C  of  Reference  3  des¬ 
cribes  the  format  of  the  transmission  error  magnetic  tape.  This  tape 
was  used  in  the  measurement  of  error  sensitivity  described  in  this 
report . 
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2.6.2  Error  Fhases 


One  concern  with  the  ESF  measurement  is  the  high  degree  of 
sensitivity  to  those  few  errors  which  may  affect  the  end  of  line  code 
and  can  cause  an  inordinate  number  of  incorrect  pels.  If  the  error  pattern 
happened  to  fall  in  an  unfortunate  phase  relative  to  the  encoded  bits, 
a  large  number  of  pels  could  be  affected.  On  the  other  hand,  the  error 
pattern  could  fall  fortuitously  and  affect  a  relatively  few  number  of 
pels.  To  insure  experimenters  can  achieve  an  adequate  level  of  statis¬ 
tical  validity,  the  concept  of  error  phases  has  been  introduced.  In 
the  basic  2ero  phase,  the  first  bit  of  the  error  record  is  aligned 
with  the  first  bit  of  the  encoded  transmission.  In  the  case  of  Phase  2, 
the  transmitted  bit  information  is  delayed  by  1 ,021;  bits  relative  to 
the  previous  run.  The  transmission  bit  information  is  delayed  by 
2,OU8  bits  for  Phase  2.  Experimenters  would  have  a  higher  confidence 
level  in  the  average  of  the  three  phases  compared  to  any  one  ESF  taken 
alone . 


2.6.3  Error  Correction 

In  order  to  precisely  measure  the  error  sensitivity,  both  the 
encoding  technique  and  the  decoding  algorithm  must  be  completely 
defined.  If  more  than  one  decoding  algorithm  is  proposed  (for  example, 
to  achieve  differing  levels  of  error  control) ,  each  must  be  tested 
separately.  Collective  Letter  No.  87  from  the  CCITT  (see  Reference  7) 
outlines  an  error  correction  procedure  to  be  used  for  simulating  two- 
dimensional  algorithms  where  an  error  correction  procedure  has  not  been 
otherwise  specified.  In  this  procedure,  the  erroneous  line  is  replaced 


by  the  previous  line  and  following  lines  are  replaced  by  white 
until  a  one-dimensional  coding  line  is  correctly  decoded. 


i 
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3.0  COMPUTER  PROGRAM  OVERVIEW 


This  section  contains  a  general  overview  of  the  computer  program 
architecture  used  under  this  contract.  The  description  is  divided  into 
two  parts.  Section  3.1  focuses  on  the  overall  simulation  process  from 
a  flow  perspective  with  particular  emphasis  on  the  simulation  inputs  and 
outputs.  Section  3.2  presents  the  hierarchical  structure  of  the  programs 
illustrating  the  structure  and  organization  of  the  main  program  and 
subroutines.  For  convenience  of  the  reader,  a  detailed  flow  chart, 
and  the  actual  program  code  listing,  has  been  included  in  Appendices 
B  and  C.  All  computer  programs  have  been  written  in  conventional 
Fortran  IV  language. 


3.1  The  Simulation  Process 

Figure  3-1  illustrates  the  interrelationship  between  the  major 
functions  of  each  simulation  program  developed  on  the  subject  contract. 
There  are  two  input  data  sets  to  each  simulation  which  originate  on 
magnetic  tape.  One  tape,  supplied  by  the  French  PTT  Administration, 
contains  all  eight  of  the  CCITT  test  documents.  The  format  of  this 
input  image  tape  is  described  in  Appendix  B  of  Reference  3.  The  other 
tape,  supplied  by  the  Federal  Republic  of  Germany,  contains  transmission 
error  data  from  actual  switched  telephone  circuits.  The  format  of  this 
input  tape  is  described  in  Appendix  C  of  Reference  3.  A  program  called 
"REDTAP"  was  prepared  to  read  the  data  from  the  input  document  tape 
while  the  error  tape  is  read  in  directly.  Data  from  the  two  input 
tapes  are  placed  on  disc  in  the  computer  system  to  be  accessed  during 
the  simulation  process.  A  separate  file  is  established  for  each  of  the 
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test  documents.  The  transmission  error  tape  is  divided  into  four 
files,  one  for  each  of  four  different  circuit  error  conditions. 

To  initiate  the  simulation  process,  the  operator  must  type  in 
a  set  of  input  parameters.  The  insertion  of  the  input  parameters  is 
accomplished  on  an  interactive  basis  with  prompting.  A  typical 
interactive  sequence  with  responses  is  listed  below. 

1.  PARAMETERS:  INPUT  (=1),  OR  DEFAULT  (=D)?  I 

2.  DIAGNOSTIC  PRINTOUT?  (TORN).  N 

3.  ENTER  MAXIMUM  NUMBER  OF  PELS  PER  LINE:  1728 
k.  ENTER  VERTICAL  SAMPLING:  1_ 

5.  ENTER  PARAMETER  K:  U 

6.  INTER  ERROR  PATTERN  PHASE:  0 

7.  ENTER  MINIMUM  COMPRESSED  LINE  LTNGTH:  96 

8.  NUMBER  OF  SCAN  LINES  TO  BE  PROCESSED  =  ?  10 

9.  ERROR  MODE  =  ?  (M=MANUAL,  T=TAPE,  N=NO  ERRORS)  N 
After  the  data  has  been  entered  and  the  measurement  parameters 

have  been  selected,  the  first  step  in  the  simulation  process  is  the 

"ENCODE"  function.  This  function  detects  color  changes  in  the  input  data 

and  constructs  the  appropriate  code  word  by  table  look-up  or  algorithm. 

The  actual  code  is  fed  to  the  error  corrupt  unit,  while  the  number  of 

code  bits  is  accumulated  with  fill  and  EOL  codes  to  provide  the  output 

total  number  of  data  bits,  to  compute  the  Compression  Factors,  CF^ 

and  CF,  . 

U 

The  error  corruption  step  combines  the  transmission  error  data 
with  the  encoded  data.  At  each  point  in  the  image  where  an  error  occurs, 
the  corresponding  bit  in  the  encoded  signal  is  reversed  and  fed  to  the 
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decode  function.  The  decoder  basically  performs  the  inverse  function 
of  the  encoder,  generating  a  series  of  lines  of  image  pels.  There  are 
two  parts  of  the  decoding  function  which  are  not  obvious  and  require 
clarification:  (l)  what  the  decoder  does  when  an  error  occurs 
(2)  what  the  decoder  does  when  a  line  is  missing.  The  operation  of 
the  decoder  under  these  two  conditions  is  described  in  Section  U. 

The  output  of  the  Decode  function  feeds  the  "WRITAP"  or  "CONVERT" 
functions  for  writing  the  error  corrupted  image  on  magnetic  tape.  It  is 
also  fed  to  a  subtraction  function  which  compares  the  decoded  image  with 
the  original  image.  Pels  which  are  in  error  are  fed  to  the  "ERRMES" 
subroutine  which  counts  all  the  pels  in  the  image  which  are  in  error. 
This  subroutine  also  counts  the  number  of  transmission  error  bits 
which  corrupted  the  encode  signal.  Finally,  the  "ERRMES"  subroutine 
computes  the  ESF  by  dividing  the  number  of  incorrect  pels  by  the 
number  of  transmitted  bits  in  error. 

Figure  3-1  shows  that  the  simulation  process  provides  a  printout 
of  all  the  computed  performance  data  as  well  as  a  summary  tabulation 
of  the  input  parameters. 

For  more  details  on  the  computer  programs,  refer  to  Section  3.2 
for  a  description  of  the  program  structure  and  to  the  Appendices  for 
flow  charts  and  program  listings. 

The  reader  should  note  that  most  of  the  software  prepared  under 
this  contract  is  suitable  for  simulating  any  compression  algorithm. 

The  only  subroutines  which  must  be  written  specifically  for  a  particu¬ 
lar  coding  technique  are  the  encode  and  decode  subroutines. 
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3.2  Program  Structure 


The  following  section  describes  the  structure  of  the  computer 
program  written  to  simulate  the  Modified  READ  code.  The  program  conforms 
to  the  general  structure  shown  in  Figure  3-2  which  illustrates  the  hier¬ 
archy  of  the  functions/subroutines  that  make  up  each  simulation  program. 

A  brief  description  of  each  of  the  functions/subroutines  follows: 

MODREAD 

The  MODREAD  program  controls  the  decoding  process  and  the  error 
recovery  procedure  for  getting  back  in  sync  when  an  error  is  detected. 

As  can  be  seen  from  Figure  3-2,  the  simulation  process  is  "decode 
driven;"  that  is,  the  main  program  controls  the  decode  process  which 
decodes  a  buffered  line  of  comprossed  data.  When  the  contents  of  the 
buffer  have  been  used  up,  a  new  line  of  data  is  encoded.  The  MODREAD 
program  also  controls  parameter  input,  measurement  of  errors,  and  reports 
computed  results. 

GETLE 

The  GETLE  subroutine  retrieves  a  number  of  requested  bits  from 
the  coded  line  and  delivers  the  bits  packed  into  a  word  (right  justified). 
End-of-line  codes  (EOL)  or  line  synchronization  signals  (IBS)  are  detected. 
If  the  number  of  coded  bits  requested  by  the  calling  program  is  not 
available,  the  ENCDE  subroutine  is  called  to  provide  them. 

ENCDE 

This  subroutine  supplies  a  line  of  compressed  data.  Color 
transitions  on  an  input  line  are  detected  bit-by-bit.  Both  one-dimensional 
and  two-dimensional  lines  are  encoded  depending  on  the  parameter  K.  The 
code  word  is  generated  by  table  look-up,  or  algorithm,  as  appropriate, 
and  added  to  the  coded  line  buffer  via  CODED!  and/or  CODENG. 
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CODELN 


The  subroutine  CODEIH  is  called  by  3ICDE  to  look  up  the  Modified 
Huffman  Code  (MHC)  corresponding  to  a  given  run  length  and  color,  apd 
add  the  code  word  to  the  coded  line  buffer. 

CODENG 

The  subroutine  COQENG  performs  a  similar  function  for  the  two- 
dimensional  case.  Based  on  a.- particular  feature,  the  appropriate  code 
word  is  generated  by  table  look-up  or  algorithm  and  added  to  the  coded 
line  buffer.  All  code  tables  for  both  one-dimensional  and  two-dimensional 
codes  are  stored  in  labelled  common  which  is  initialized  by  a  BLOCK  DATA 
subprogram. 

ONEEHG 

The  ONEEMG  subroutine  decodes  the  MHC.  It  extracts  a  set  of 
n  bits  (n=3  initially)  from  the  coded  line  and  looks  for  a  match  with 
all  code  words  of  length  n,  increasing  n  until  a  match  is  found  or  the 
code  table  is  exhausted.  When  and  if  a  match  is  found,  the  indicated 
bits  are  constructed  on  the  output  line.  Any  errors  detected  in  the 
decoding  process,  such  as  no  match  to  code  table,  or  line  too  long, 
are  flagged. 

TW3EUG 

This  subroutine  performs  the  same  function  as  ONEEUG  for  the  two- 
dimensional  line. 

MI23  and  IliB 

The  subprograms  MI23  and  lUB  are  used  to  pack  and  unpack  a  set 
of  bits  into  (or  from)  an  array  of  words. 
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It *0  Error  Detection/Correction  Procedure 


In  Reference  7.0,  the  following  error  checking  and  processing 
procedure  was  specified  by  the  CCITT  for  testing  the  proposed  two- 
dimensional  coding  techniques: 

1)  Error  checking  -  If  decoded  signals  are  not  exactly 
1728  pelsAine,  the  line  is  recognized  a3  an  erroneous 
line. 

2)  Error  processing  -  The  erroneous  line  is  replaced  by 
the  previous  line  and  following  lines  are  replaced  by 
white  lines  until  one-dimensional  coding  line  is 
correctly  decoded. 

The  error  detection  and  correction  procedures  used  in  this  simu¬ 
lation  follow  the  spirit,  if  not  the  letter,  of  this  directive. 

The  error  checking  was  expanded  to  include  the  detection  of  any  condi¬ 
tion  that  could  not  possibly  occur  in  a  correctly  received  transmission. 
Some  examples  of  possible  error  conditions  are: 

o  EOL  occurs  before  1 728  pels  have  been  written 
o  More  than  2728  pels  have  been  written  before  EOL  is 
received 

o  No  word  in  applicable  code  table  matches  received  bit 
pattern 

o  Current  line  decoding  references  a  run  that  does  not 
exist  in  the  previous  line 

o  Pels  are  written  to  the  left  of  the  first  pel  on  the  line 
Upon  detection  of  an  error  condition,  the  decoder  attempts  to  re¬ 
synchronize  by  searching  for  the  next  unique  Line  Synchronization  Signal 
(I£S) .  The  state  diagram  for  error  recovery  for  these  algorithms  is  shown 
in  Figure  L-1  . 
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Figure  l»-1  DECODE  STATE  DIAGRAM 


Because  of  transmission  errors,  some  of  the  original  image  lines  may¬ 
be  missing  in  the  output,  or  additional  lines  may  be  in  the  output  that 
were  not  in  the  original  image.  In  order  that  a  missing  or  extra  line 
not  have  an  undue  influence  on  the  ESF,  it  is  important  that  the  original 
and  received  images  not  get  permanently  out  of  line  alignment  when  they  are 
compared  to  determine  the  number  of  pel  errors.  To  this  end,  each  of  the 
lines  in  the  original  image  is  assigned  a  serial  line  number,  and  this 
number  continues  to  be  associated  with  the  same  line  in  the  received  image. 

If  a  transmitted  line  is  dropped,  due  to  the  loss  of  an  EOL,  then  its  line 
number  will  be  missing  in  the  output.  On  the  other  hand,  if  a  line  is 
broken  into  two  or  more  lines  in  the  received  image,  due  to  false  EOL's, 
then  its  line  number  will  appear  more  than  once  in  the  output. 

If  no  lines  are  dropped  or  added,  the  line  numbers  of  the  original 
and  received  lines  that  are  compared  to  detect  pel  errors  will  be 
equal.  When  a  line  is  added  or  deleted,  the  line  numbers  of  the  compared 
lines  will  become  unequal.  When  this  occurs  for  the  first  time,  the  two 
lines  with  different  line  numbers  are  compared  to  determine  the  number  of 
pel  errors,  which  is  added  to  the  pel  error  total.  Then,  instead  of 
proceeding  to  the  next  line  in  both  the  original  and  received  images,  the 
next  line  is  used  in  only  one  of  the  images,  with  the  previous  line  being 
used  in  the  other  image.  The  line  is  advanced  only  in  that  image  that  has 
the  smaller  line  number,  so  as  to  tend  to  make  the  line  numbers  of  the 
two  images  more  equal.  This  continues  until  the  line  numbers  are  equal,  after 
which  the  next  line  is  used  in  both  images,  until  another  inequality  is 
detected.  This  procedure  provides  a  proper  penalty  for  a  missing  or  added  line, 
but  prevents  this  type  of  error  from  causing  pel  errors  over  the  entire 
image  below  the  place  where  it  occurred. 
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5-0  MEASUREMENT  RESULTS 

During  the  course  of  the  study,  Delta  Information  Systems  prepared  a 
computer  program  to  simulate  the  Modified  READ  code.  The  program  was  run 
on  the  Hybrid  Computer  Facility  at  the  Defense  Communications  Engineering 
Center  in  Reston,  Virginia.  A  total  of  twenty-two  computer  runs  were 
performed.  Twenty  runs  were  performed  at  low  K-f actors  (K  *  2,  4)  and 
two  runs  were  at  an  infinite  K-f actor.  The  parameters  for  twenty  runs 
performed  at  low  K-factors  are  listed  in  Table  5-1 •  The  test  results 
for  the  Modified  READ  code  for  these  twenty  runs  are  provided  in  Table  5-2. 
For  reference  purposes  Tables  5-3  through  5-7  are  included  for  the  same 
twenty  test  conditions  for  five  other  candidate  two-dimensional  coding 
techniques — AT&T,  IBM,  3M,  Japan  (READ),  XEROX.  The  compression  and  error 
sensitivity  of  the  Modified  READ  code  appears  very  satisfactory  relative 
to  the  other  five  candidate  techniques. 

Table  5-8  summarizes  the  results  of  the  tests  which  were  performed 
at  an  infinite  K-f actor.  Again  the  performance  of  the  Modified  READ  code 
appears  to  be  favorable  relative  to  the  seven  other  two-dimensional  codes 
which  were  evaluated  in  previous  studies.  Table  5-9  summarizes  the  coded 
line  length  statistics  for  the  Modified  READ  code. 

Table  5-10  compares  the  performance  of  the  Modified  READ  code  with 
that  of  the  Modified  Huffman  code  which  had  been  simulated  in  an  earlier 
program.  The  results  in  the  first  and  second  rows  indicate  that  the  im¬ 
proved  compression  performance  of  the  Modified  READ  relative  to  the 
Modified  Huffman  is  limited  for  standard  resolution  and  a  complex  image 
like  CCITT  document  number  U.  However,  the  improvement  increases  for  high 
resolution  as  shown  in  the  third  row.  The  CF^  for  modified  RE1AD  at  an 


TABLE  5  -1  TABULATION  OP  TEST  ROE  PARAMETERS 


TEST 

LOCUMHTT 

NUMBER 

ERROR 

PHASE 

TRANSMISSION 

ERROR 

FILE 

KM.  SCAM 
LIRE  TIME 
(ag.) 

VERTICAL 
RESOLUTION  * 
(lines /oh. ) 

1 

It 

0 

1 

20 

3.85 

2 

It 

0 

1 

20 

7.70 

3 

U 

0 

2 

20 

3.85 

U 

it 

0 

2 

20 

7.70 

5 

it 

0 

3 

20 

3.85 

6 

It 

0 

3 

20 

7.70 

7 

u 

0 

it 

20 

3.85 

8 

u 

0 

it 

20 

7.70 

9 

u 

1 

1 

20 

7.70 

10 

It 

2 

1 

20 

7.70 

11 

it 

0 

1 

10 

3.85 

12 

it 

0 

2 

10 

7.70 

13 

it 

0 

3 

10 

3.85 

1U 

it 

0 

It 

10 

7.70 

15 

1 

0 

1 

20 

3.85 

16 

1 

0 

1 

10 

7.70 

17 

5 

0 

1 

10 

7.70 

18 

5 

0 

1 

20 

3.85 

19 

7 

0 

1 

20 

3.85 

mi 

7 

0 

1 

10 

7.70 

*  For  Resolution  of  3.85  lines /hi  K-2 
"  ■  •  7.70  •  E-U 
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Table  5-2  Compression/Error  Sensitivity  Test  Results,  Modified  READ  Algorithm 


TABLE  5-3  TEST  RESULTS,  AT&T  ALGORITHM 


TABLE  5-4  TEST  RESULTS,  IBM  ALGORITHM 


672,892  564  .83  27,093  |  628,606  I  48.0372  I  6.1016  I  6.5315 


TABLE  5-5  TEST  RESULTS,  3M  ALGORITHM 
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TABLE  $-7  TEST  RESULTS,  XEROX  ALGORITHM 


2693  1  5.4753 


'ABLE  5-8  TEST  RESULTS  FOR  INFINITE  K-FACTOR 
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♦DOCUMENT  NO.  -  4;  ERROR  PHASE  -  0;  ERROR  FILE  -  1;  MIN.  SCAN  LINE  TIME  -  20  ms 


Error  Phase 


infinite  K-f actor  is  7.U1  which  is  66%  better  than  the  CF^  of  the 

Modified  Huffman.  For  a  non-complex  image  like  CCITT  document  number 

1  (see  row  7  of  Table  5-10)  the  relative  improvement  is  greater  even 

at  low  resolution.  In  this  case,  the  Modified  READ  CF,  at  an  infinite 

U 

K  factor  exceeds  the  Modified  Huffman  CF^  by  over  1005?,  In  general, 
the  ESF  for  the  Modified  READ  is  about  twice  the  ESF  for  the  Modified 
Huffman  code. 

Figures  5-1  through  5-6  illustrate  the  subjective  effects  of  the  errors 
in  several  of  the  simulations  listed  in  Table  5-10.  Figures  5-1  and  5-2 
simulate  the  output  for  the  Modified  Huffman  code  at  standard  and  high 
resolution  respectively  (rows  2  and  3  of  Table  5-10).  Figures  5-3  and 
5-U  illustrate  the  output  images  for  the  Modified  READ  code  for  the  same 
relative  test  conditions.  Notice  that  the  legibility  of  the  Modified 
READ  code  images  is  poorer  than  the  corresponding  Modified  Huffman  docu¬ 
ments.  This  corresponds  to  the  indication  of  the  relative  ESF  measurements. 
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L'ordre  de  buicement  et  de  rAsRaatinn  Man  application#  fait  l'nhjat  Ha  HAolsiora  au  plus  haut 
niveau  He  la  Direction  Q Antral#  dee  Telecommunications.  II  n'est  certss  pas  question  da 
eooatruira  o«  ayatSme  iatAgrA  "an  bloc"  mala  blan  au  central?#  Ha  proc Adar  par  Atapes,  paJ»- 
paliers  successlfs.  Cert  aloes  applications,  dont  la  rentabilitd  ns  pourra  itra  assure#,  tt 
seront  pas  entreprises.  Actuellsment,  sur  trente  applications  qui  out  pu  Atre  global# men! 
dAfinies.  sixen  sont  au  stade  ds  l'axploitation,  six  autre#  se  toot  vu  donner  la  prioritA  pour 
leur  realisation. 

Chaqus  application  sat  confide  k  un  "chef  da  projat".  responsabla  succaaaieaacat  da  sa 
conception,  de  son  anal  y#e -pro gr  animation  at  He  ss  mise  en  oeuvre  dsns  una  rAgioo-pilota. 
La  generalisation  ulteriaurs  da  l'applicatlon  realises  dsns  cetts  region-pilots  dApaod  dea 
resultata  obtenus  et  fait  l’objet  d'una  decision  de  is  Direction  GAnArale.  NAanmolns,  la 
chef  da  projet  dolt  d#s  la  depart  ccsisidArer  qua  son  sctivlte  s  una  vocation  nationals  done 
refuser  tout  particularisms  regional.  Q  est  side  d'une  equips  d1  analy stsa -pro gram msurs 
at  antourd  d’un  "groups  ds  conception"  "charge'dSTedtger^ia"uocoxBtnt'iiaJ,ue/inith«u‘daa 
objectlfs  globaux"  puis  Is  "eshisr  das  charges"  ds  I'spplicstion,  qui  sont  sdrsasds  pour  avis 
4  tous  las  services  utllisateur t  potentials  at  sux  chefs  dc  projet. dee  autre  a.  apnllcatiaea. 
L«  group*  de  conception  coraprend  6  a  10  per  tonnes  reprAsentant  las  services  las  plus 
divers  concerns#  par  le  projet, et  comporte  ohligatoirement  un  bon  analysts  attache  k  l'ap- 
pll  cation. 


n  -  LTMPLANTATION  GEOGRAPHIQUE  D'UN  RESEAU  1NFORMATIQUE  PERFORMANT 

L 'organisation  de  Van tre prise  ftran$aisa  dea  telecommunications  repose  sur  l'exi stance  de 

20  regions.  Dee  calculsteurs  ar.t  ete  implsntAs  d&ne  le  passA  au  moins  dans  toutco-lea  plus— - 

important# s.  Ontrouve  aissi  das  machlnaa  Bull- Gamma -3Q  A  Lyon  at  Marseille,  -da»  GE- 13$--  - . 

k  Lilia,  Bordeaux.  Xc"!?1*!”  »'  nv  see  »  M»»»y  «n*<«  w— 

Bull  300  TI~A~programmea  cAblAii'Aikiehi-receni'meiit-ou'smu'enCof-'reiraervic#  aans^es 
regions  da  Nancy,  Nantea,  Limoges,  Poitiers  at  Rouen  ;  ce  pare  est  eseentiellement  utilise 
pour  la  comptabiUt*  teiephoniqu*. 

Al'avenir,  alia  pin  part  das  flchlers  nAcessalres  sux  applications  dAcrites  plus  haut  peuvent 
etrageresen  temps  differ e,  un  certain  nombre  d'entre  sux  dsvront  necsssairamsnt  etrs  sc- 
cessihlss,  voire  mis  k  jour  en  tampa  reel  :  perml  cob  dernlars  le  flchier  commercial  dee 
abonnea,  le  flchier  dea  renrseignements,  le  flchier  des  circuits,  le  fichier  technique  dee 
abennes  contlendront  des  qusntites  considerables  d'informstions. 

Le  volume  total  ds  caractAito*  k  gArer  en  phase  finale  sur  un  ordinateur  ayant  en  charge  . 

quelques  500  000  abonnAs  a  Ate  eatimt  a  un  milliard  de  caractAres  au  moins.  Au  moins  le 
tiers  des  doontes  seront  concernAes  par  das  trsitsmsnts  an  tamps  rAal. 

Aucun  des  calculateurs  AnumArAs  plus  haut  ns  parmattait  d'envisagar  de  tel#  traitements. 

L'intAgration progressive  de  toute#  lee  applications  suppose  la  creation  d'un  support  commun 
pour  toutss  les  informations,  une  veritable  "Banque  de  donnAe#",  rApartie  sur  des  mo  yen# 
detraitement  nationaux  et  rAgionaux,  et  qui  dsvra  restar  alimsntAe,  mlsa  A  jour  an  ptrma- 
nence,  k  partir  da  Is  bass  da  l'antreprlse,  e'est-A-dlre  les  chantlers,  les  magaains,  les 
guichets  des  services  d'abonnement,  les  services  de  personnel  etc. 

L’Atude  des  diffArents  flchlers  A  constituer  a  done  permis  de  dAfinir  les  principales  carac- 
tAristiques  du  rAseau  d'ordinateur*  nouveaux  k  mettre  en  place  pour  aborder  la  rAalisatlon 
du  systAme  informatif.  L'obligationde  false  appel  A  des  ordlnateurs  de  troisiAme  gAnAration, 
trAs  puissants  «t  dotA#  de  volumlneusea  mAmoires  de  masse,  a  conduit  k  en  rAduire  substan- 
titllement  le  nombre. 

L 'implantation  de  sept  centres  de  calcul  interrAglonaux  constituera  un  compromis  entre  : 
d'une  part  le  dAsir  de  rAduire  le  coat  Aconomlque  de  l'ensemble.  de  faciliter  la  coordination 
des  Aqulpes  d'lnformatlclens;  et  d'autre  part  le  refus  de  crAer  des  centres  trop  important  a 
dlfflcilas  k  gArer  et  k  dlriger.et  poaant  des  problAmes  dAlicats  de  sAcuritA.  Lc  regroup© - 
raent  des  traitements  relatifs  k  pleaieurs  r&fiont  wr chtcnrr ce»'  •cfn  cam rtr*' pwr-me  ttra 
de  leur  donnar  "une  taiUv  reixtivemeni  homogAne.  Cheque  oenvre  •  gArera"  environ  un  mil-  :- 

lion  d'abonnAs  A  la.  fin  du  VIA  me  Plan - " - 

La  mise  en  place  de  ces  centres  a  dAbutA  au  dAbui  de  1'annAc  1971  :  un  ordinateur  IRIS  10  de 
lx  -l-'IfifwV  s-.-.eei qu*  i-t.t  Muuii*-'  1*  Lmmwwi  iu»' ' 1 

ntme  machine  vient  d’Atre  mise  en  service  au  centre  de  calcul  interrAgional  de  Bordeaux. 


Figure  5-1  Modified  Huffman,  standard  resolution  (Row  2  of  Table  5-10) 

Photo  n*  1  -  Document  trfes  dense  lettre  1,5mm  de  haut  - 

Restitutio##  photo-  »*  9  -  5-1  3 


L'ordrede  lineament  et  de  realisation  dee  spplic ations  fait  I'objet  daddclsions  au.plua.haut 
niveau  de  la  Direction  Gdndrals  dea  Telecommunication*.  U  n'eat  certea  paa  queation  de 
canatrulreceayattmaJntdgEdL-en  bloc"  nxaiehien  au  coatralre.de  procider  par  eta  pea*  par 
pallera  aucceaalfa.  Certain* a  appllcatlona,  dent  la  rantabilitd  ne  pourra  dtre  assurd*.  a 
aeron t  paa  entrepriaea.  Actuellement,  aur  trente  application*  qui  ant  pu  4tr#  globalement 
ddfinlea,  alien  aont  au  atad*  de  Sexploitation,  aix  autreaae  aont  vu  donner  la  priority  pour 
leur  realisation. 

Cheque  application  eat  confide  4  un  "chef  de  projet",  re aponaabla  auccaaaivexnent.de  «a 
conception,  de  eon  analyse -pro  gram  mat  ion  et  de  sa  miae  en  oeuvre  dan  a  une  rdgion-pilote. 
La  generalisation  ultdrleur*  de  1*  application  rdaliade  dana  cette  rdgion-pilote  ddpend  dea 
rdaultata  obtenu*  et  fait  l'objet  dHme  ddciaion  de  la  IHrectian  Gdndraie.  NCamnoins,  le 
chef  de  pro  jet  doit  dda  le  depart-  oonaiddx^-que*eon-acti?dtd^J»ae..v«natiot«^Mttgp.»le.  -donc- 
refueer  tout  particulariame  regional.  D  eat  aidd  d'une  dquipe  d'analyatea-programmeura 
et  entourd  d'un  "groupe  de  conception"  charge  de  rddlger  le  document  de  "ddfinitlon  dea 
objectif*  globaux"  puia  le  "cahier  dea  charge*"  de  1'  application,  qui  aont  adreaada  pour  avia 
4  toua  lea  servicea  utiliaateur*  potentlela  et  aux  chef  a  de  pro  jet  dea  autre  a  application*. 
Le  groupe  de  conception  comprend  6  k  10  peraonnea  reprdaentant  lea  aervlces  lea  plua 
divers  concerad*  par  la  projet, et  comporte  obllgatotrement  un  bon  analyata  attach 6  k  l'ap- 
pllcatlon. 

H  -  L' IMPLANTATION  GEOGRAFHIQUE  D'UN  RESEAU  INFORMATIQUE  PERFORMANT 

L 'organisation  da  l'entrepriae  franqaiae  dea  tdldcommunlcationa  repose  aur  l'existence  de 
20  rdglona.  Dea  calculateurs  ont  dtd  implantda  dana  la  pasad  au  molns  dana  toutes  las  plua 
important* a.  Ontrouve  ainai  dea  machines  Bull  Gamma  30  k  Lyon  et  Marseille,  dea  GE  42S 
k  Lilia,  Bordeaux,  Toulouse  et  Montpellier,  un  GE  437  4  Massy,  enfln  quelquea  machines 
Bull  300  H  4  programmes  cftbldadiaieitfc  ~r<taeiim»vnt:qn-  aont.  encore.  emwuart.ee  dann  lea 
rdglona  da  Nancy,  Nan  tea,  Limoges,  Poitiers  et  Roues  ;  ce  pare  ext  c  s  ten  tic  He  meet  utilise 
pour  la  comptabllitd  tdldphonique . 

Al'avenir,  alia  plupart  das  flchier*  ndcasaalras  aux  applications  ddcrita a  plus  haut  peuvent 
•tregdrdsen  tamps  dlffdrd,  un  certain  nombre  d'entre  eux  davront  ndeessairement  dtre  ac¬ 
cessible  a,  voire  mis  4  jour  en  temps  rdel  :  parml  ces  dernier*  le  flchier  commercial  dea 
abonnds,  le  flchier  dea  reiraeignements,  le  fichlar  dea  circuits,  le  flchier  technique  dea 
abounds  contlendront  das  quantitds  considdrables  diinformationa.- . . 

La  vo  luma  total  .rig  car  act*  VS  a  A  gdrer  an  phase  finale  aur  an  OTdtaateur.eyantaa-cjgmse- 
quelquea  500  000  a  bound  a  a  did  eathndr  4  -un  milliard  dar  canacidrtnraumoinar  Aumoina  le 
tiara  das  donndea  aeront  concemdea  par  dea  traitements  en  tempa  rdel. 

Aucun  das  ealculataurs  dnumdrda  plua  haut  ne  permettait  d'envi  sager  de  tela  traitements. 
L'lntdgration  progressive  detoute*  lei  applications  suppose  la  crdatlon  d'un  support  commun 
pour  toutes  lea  informations,  une  vdrltable  "Banque  de  donndea",  rdparti*  aur  dea  moyena 
detraitement  nation  aux  et  rdgionaux,  et  qui  devra  reater  aliment  de,  miae  4  jour  en  perma¬ 
nence,  4  partir  de  la  base  de  l'entrepriae,  c'est-4-dire  lea  chantiers,  lea  magaaina,  lea 
guicheta  dea  servicea  d'abonnement,  lea  servicea  de  personnel  etc. 

L'dtude  dea  dlffdrents  flchiera  4  constituer  a  done  permis  de  ddflnir  lea  prlncipales  carac- 
tdrlstlquea  du  rdseau  d'ordinateurs  nouveaux  4  mettre  en  place  pour  a  border  la  rdaliaation 
du  systdme  informatif .  L' obligation  de  falre  appel  4  dea  ordinateura  de  troisidme  gdndratlon, 
trds  puissant*  etdotdsdevolumineuses  mdmoires  de  masse,  a  conduit  4  en  rddulre  aubatan- 
tlellement  le  nombre. 

L 'implantation  de  sept  centre*  de  calcul  interrdgionaux  constituera  un  compromis  entre  : 
d'une  part  le  ddair  d*  rdduire  le  coflt  dconomique  d*  l'ettaemble,  de  faciliter  la  coordination 
das  dquipaa  d'lnformatidena;  et  d'autre  part  le  refus  de  order  dea  centres  trop  important* 
difflclias  4  gdrar  et  4  diriger.et  posant  dea  problems*  ddlicata  de  sdcurltd.  Le  regroupe- 
ment  das  traitements  re  la  Ufa  4  pluaieurs  rdglona  aur  chacun  de  cea  aept  centre*  permettra 
da  lour  donnar  un*  tailla  relative  me  nt  homogdne.  Cheque  centre  "gdrera"  environ  un  mil¬ 
lion  d'abonnda  4  la  fin  du  VI4m*  Plan. 

La  miae  en  place  de  cea  centres  a  ddbutd  au  ddbut  de  l'anr.de  1871  :  un  ordinatcur-IRlS  SO  de¬ 
ls  Compagnie  IntamaUonale  pour  l'Informatique  a  dtd  installd  4  Toulouse  an  fdvrier  ;  la 
ra*ma  machine  vient  d'etre  miae  en  service  au  centre  de  calcul  interrdglonal  da  Bordeaux. 

Figure  5-2  Modified  Huffman,  high  resolution  (Row  3  of  Table  5-10) 

Photo  n*  1  -  Document  trda  dense  lettre  1,5mm  de  haut  - 

Reetltutioo  photo  n*  9  5-1 U 


T.'nrdrtd*  Iinctmcat  et  d«  realisation  da  a  application!  fait  l'objet  da  decision*  au  plus  haut 
niveau  de  la  Direction  Generate  dee  Telecommunication*.  11  n'est  certea  pas  question  do 

nrntmlp*  ayiMm*  IntSsrft  "rn  hliv"  main  hlnn  an  pnntnlra  de  niwWfr  nar  M an**  npr 
palters  sucoessifs.  Certains  a  applications,  dont  la  rentabllitd  ne  pourra  atre  assures,  m 
as  root  pas  entreprises.  Actuellsment,  sur  trente  applications  qui  ant  pu  atre  globalement 
deflates,  slxen  sont  au  stade  de  Sexploitation,  six  autre*  se  sent  vu  donnsr  la  priority  pour 
leur  realisation, 

Cheque  application  est  confide  ft  un  "chef  de  projst",  responsable  succeealvcmcnt  de  aa 
conception,  de  eon  anal  ysc -pro  gram  mail  un  «lti«  w  mise  «u  uvuvrv  Uaue  uu«  legluu-piluU*. 
La  gdndraliaation  ultdrleure  de  rapplieatlon  reallsfte  dans  cette  region-pilot*  d Spend  dee 
rdeultate  obtenue  et  fait  l'objet  d'une  decision  de  la  Direction  Generate.  NSanmolns,  la 
chef  de  projet  doit  dfts  le  depart  conslddrer  qua  son  activitS  a  une  vocation  national*  done 
refuser  tout  particularisms  regional.  Q  eat  aid*  d'une  equips  d'analystes-prograxnmeurs 
et  entourS  d'un  "groups  de  conception"  charge  da  rftdtgar  le  document  de  "definition  dea 
objsctif*  globaux"  puis  le  "cahler  dea  charges"  da  rapplication,  qui  sont  adressds  pour  avis 
ft  tous  tee  service  a  utilisateura  potentials  st  aux  chefs  de  projet  dea  sutree  applications. 
T «  <w»nwwi  Am  f/>mnp«nrt  II  &  in  r^iw^ntint  Vt  H^pv1p#K  ftlnft 

m  •  *  ••*■  -  •  a  a  •  *  • 

divers  concemfts  par  Is  projet, at  comporte  obilgatolrement  un  bon  analyst*  attache  ft  l'ap- 
plication. 


n  -  L'IMPLANTATION  GEOGRAPHIQUE  D'UN  RESEAU  INFORMATIQUE  PERFORMANT 

L' organise tion  ds  l'entre prise  franqalss  dee  telecommunications  repose  sur  l'existsnce  de 
20  region*.  De*  calculateurs  ant  SIS  implants*  dans  te  pass*  au  moins  dans  tout**  tea  plus 
Important#*.  On  trow*  ainsl  de*  machines  Bull  Gamma  30  ft  Lyon  ct-MarteUle,  dea  GE  42$ 
ft  Lllls,  Bordeaux.  Tnulnun*  et  Montpellier,  un  f?F.  4.17  ft  Massy.  enffn  quelqnen  machines 
Bull  300  Tt  ft  arosrsmmaa  cftblSs  ft talent  rftcsmmsnt  ou  sont  encore  en  service  dene  les 


l«|ftwu«tM  ft««ftJWj,  ftlftWlM*,  A  VftftftOt  •  itvtfdll  ,  V*  V  Vlift  OVMUMVUVIilVUl  UftUiBV 

pour  la  coroptabBite  tftlftphonique. 

Al'avenlr,  alia  plupart  des  flchlers  necessalres  aux  applications  dScrites  plus  haut  peuvent 
etre  gSrSsen temps  differ ft,  un  certain  noiubre  d'enire  tui  dsvruui  nSceasairement  etrv  ac- 
ceeslbtes.  voire  mis  ft  jour  en  tempe  reel  *.  parml  css  darnlera  1s  flchier  commercial  des 
abonnS*.  te  flchier  ds*  rcirsslgrwmsnt*.  1*  flchier  des  circuits,  le  flchier  technique  dee 
abonnSs  cootiendront  des  qusntitSs  considerables  d' informations. 

L*  volume  total  ds  caracttr^s  ft  gSrer  en  phase  finale  our  un  ordinateur  ayant  en  charge 
quelques  500  000  abannSa  a  StS  eatimS  ft  un  milliard  de  caractSrea  au  moina.  Au  moins  te 
tiers  dee  donnSee  aeronl  cvHiueruSSa  par  dea  Iraileuiviila  vu  temps  rftvl. 

Auoun  des  calculateurs  ftnumftrfts  plus  haut  ns  psrmettait  d'envisagsr  de  tels  trait* ment*. 
L'intSgration  progressive  de  tout**  les  applications  suppose  la  creation  d'un  support  commun 
pour  touts*  lea  informations,  une  veritable  "Banque  de  donn*es",  rftpartte  sur  des  moyens 
dstraitement  nationaux  et  regionaux,  et  qui  dsvra  raster  alimentee,  mis*  ft  jour  en  perma¬ 
nence.  ft  partir  de  la  base  de  l'sntreprise,  e'est-ft-dire  les  chantiers.  les  magasins,  tea 
guichets  des  services  d'abonnement,  les  service*  de  personnel  etc. 

L'etude  des  different*  flchlers  ft  constituer  a  done  permis  de  dftfinir  les  principalea  carac- 
tftrletiquss  du  r«se*u  d'ordinateur*  nouveaux  ft  mettre  en  place  pour  aborder  la  realisation 
du  ay itft me  informatif .  L ’obligation  d*  falre  appel  ft  des  ordinateurs  de  troisteme  generation, 
trfts  puissant*  et  dotes  devolumlneusea  memoire*  de  masse,  a  conduit  ft  en  rftduire  subatan- 
tiallement  le  nombre. 

L 'implantation  de  aept  centres  de  calcul  interrftgionaux  constituera  un  compromis  entre  : 
d'une  part  le  dftsir  de  rftduire  le  coflt  eeonomiqus  de  l’ensemble.  de  facillter  la  coordination 
de*  equips*  d'lnformatielens;  et  d'autre  part  le  refus  de  erfter  des  centres  trop  importants 
difficile*  ft  gerer  et  ft  dlriger.et  posant  des  problftmes  dellcats  de  aftcurite.  Le  r*  group*  - 
ment  des  traitements  relatifs  ft  plusleurs  regions  sur  chaeun  de  ce*  sept  centres  permettra 
de  leur  donner  une  tallle  relativement  homogene.  Cheque  centre  "gftrera"  environ  un  mil¬ 
lion  d'abonnea  ft  la  fin  du  Vie  me  Plan. 

L«ffite#tii  place  lie  v**  venire*  a  debut*  au  debut  de  l'annfte  1 97  I  :  un  ordinateur  BITS  ISO  de 
la  rnmnajfni-  (nTfmanmglf  nmir  i'tniormiuque  1  *t«  install*  2  1 OUlCUtft  *n  ICVriSP  (  la 

mftme  machine  vient  d'etre  mice  cn  ccrvicc  au  centre  de  calcul  interregional  ds  Dord«»u*. 


L'nrdrede  lan  cement  et  d«  realisation  dea  applications  fait  l'objet  de  decisions  au  plua  tout 
niveau  da  la  Direction  Gdndral*  dea  Telecommunications.  Q  n'eat  cartaa  pea  question  de 
conatruire  ca  system*  intdgr*  "an  bloc"  mala  bien  au  contra  irs  de  proedder  par  dtapes,  P*r 
paliera  aucceeaifa.  Cert  mines  application*,  dent  la  rentabtlitd  ne  pourra  ftten  aamtrde,  oa 
aeront  pea  entrepriaes.  Actuellement,  aur  trente  application*  qui  out  pu  it  re  globalement 
deflates .  aixen  aont  au  ntade  de  Sexploitation,  aix  autre  a  se  aont  vu  donner  la  priority  pour 
leur  realisation. 

Chaque  application  eat  confide  a  un  "chef  de  projet",  reaponaable  aucceaaivement  de  aa 
conception,  oe  eon  anajyse-programniaiiuu  n  u«  aa  uuae  cm  ueavic  uuic  uu«  i  «|igu>|iuuwi, 
la  oAndraliantinn  nltMmrs  de  1  'application  realise#  dana  cette  rdffion-oilote  ddoend  dea 
rdsultats  obtenua  et  fait  l'objet  d'une  decision  de  la  Direction  Gdndral*.  Ndanmolns,  le 
chef  de  projet  doit  dda  le  depart  conaiddrer  que  aon  activitd  a  un*  vocation  national*  done 
refUaer  tout  partlcularlame  regional.  □  eat  aide  d'une  dquipe  d ' analyst## -programmeur  a 
et  entourd  d'un  "group*  de  conception"  chargd  de  rddiger  le  document  dc  "definition  dea 
nhiartlfn  etohaux"  nuU  le  "oahier  dee  charsea"  de  l'acwlication.  oui  aont  sdrdaada  DOUT  avia 
a  tous  tea  aervicea  utiusateurs  potenueis  et  aux  cneis  ae  pro  jet  dea  autrea  applications. 
La  group*  de  conception  oomprend  8  1  !?  perform**  reprda* ntant  le*  aervicea  le#  plus 
diver#  concernda  par  le  projet, et  comports  obligatoirement  un  bon  analyst#  attach d  4  1' ap¬ 
plication. 


n  -  L'IMPLANTATION  GEOGRAPHIQUE  D'UN  RESEAU  ENFORMATIQUE  PERFORMANT 

L 'organisation  de  i'entreprie*  franqaise  uea  telecommunications  repose  aur  resistance  de 
20  rdgiona.  Dea  calculateura  ont  dtd  implantd*  dana  le  paaad  au  moms  dana  toutes  las  plua 
important*  a.  Ontrouve  ainai  dea  machine  a  Bull  Gamma  30  4  Lyon  at  Maraeille,  dea  GE  42S 
4  Lille,  Bordeaux.  Toulouse  et  Montpellier,  un  GE  43?  4  Massy,  enfln  quelques  machine* 
Bull  300  TI  4  programme*  ciblda  dtaiant  rdcsmment  ou  aont  encore  *n  service  dana  las 
rdgiona  de  Nancy,  Nantaa,  Limoges,  Poltlars  at  Rouen  ;  ce  pare  eat  eaaentieUeroent  utilise 
pour  la  comptabilitd  tdldphonique. 

Al'avenlr,  alia  plupart  dea  flchtera  ndceaaaires  aux  applications  ddcrites  plus  tout  peuvent 
•tre  gdrdsen temps  diffdrd,  un  certain  nombre  d'entre  eux  devront  ndeessairement  dtr*  ac- 
ccaaibles,  voir*  mis  4  jour  en  temp*  reel  :  par  mi  ce*  dernlers  le  fichier  commercial  des 
abonnda,  1*  fichier  dea  remeignementa,  le  fichier  des  circuits,  le  fichier  technique  dea 

ahonndn  mntivnrlrnnt  it»«  rnnyfit^riM**  d’informstions. 
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tiara  des  donndes  aeront  concern  des  par  des  traitements  en  temps  rdel. 

Aucun  dea  calculateura  dnumdrds  plus  haut  ne  permettait  d'envisager  de  tela  traitements. 
L'intdgratlon  progressive  de  toutes  lea  applications  suppose  la  crdatlon  d'un  support  commun 
pour  toutes  lea  informations,  un*  vdrltabl*  "Banque  de  donndes",  rdpartle  aur  des  moyens 
d*  trait* ment  nationaux  et  rdgionaux,  et  qui  devra  rester  alimentde.  mlse  4  jour  en  perma¬ 
nence,  4  partir  de  U  base  d*  l'entreprlae,  c'est-4-dire  lea  chantiers,  lea  magasins,  lee 
gut  chela  daa  services  d'abonnement,  lea  services  de  personnel  etc. 
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au  sysieme  miormatu.  i^  oougauan  ae  isire  appei  a  aes  oramateurs  ae  troisieme  generation, 

trda  puissants  et  dotds  de  volumineusea  mdmoires  de  masse,  a  conduit  4  en  rdduire  substan- 
1- 

•*v  «IVMt  sv  V, 

L 'implantation  d*  sept  centres  de  calcul  Lnterrdgionaux  constituera  un  compromis  entre  : 
d'une  part  le  ddair  de  rdduire  1*  coOt  dconomlque  de  l'ensemble,  de  faciliter  la  coordination 
des  dqulpes  d'lnformatlclens;  et  d'autre  part  le  refus  de  erder  des  centres  trop  important* 

aiWIollax  »  ><!•«••  A  .11-1.—-  .*  — J.-  ...LU - -  J41I..1.  J.  T  .  ... _  . 
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ment  des  traitements  relaUfs  4  plusleurs  rdglons  sur  chacun  de  cea  sept  centres  permettra 
da  leur  donner  un*  taille  relativement  homogdne.  Chaque  centre  "gdrera"  environ  un  mil¬ 
lion  d'ebormda  4  la  fin  du  Vldme  Plan. 

La  mins  en  place  de  cea  centres  a  ddbutd  au  ddbut  de  1'annde  1 97 1  :  un  ordinateur  IRIS  SO  d* 
la  Compagni*  Internationale  pour  l'lnformatiqu*  a  dtd  instaUd  4  Toulouse  en  fdvrier  ,-  la 
mSme  machine  vient  d'etre  raise  en  service  au  centre  de  calcul  interrdglonal  d*  Bordeaux. 


Figure  5-U  Modified  READ,  high  resolution  (Row  3  of  Table  5-10) 

Photo  n*  1  -  Document  trfcs  dense  lettre  1, 5mm  de  haut  - 

Restitution  photo  n*  9 
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THE  SLEREXE  COMPANY  LIMITED 

MNM  LAMB  -  BOOLB  •  DORSET  .  BH29  I  EE 
mmmrn  soma  (945  U)  31617  -  mjx  123436 


Our  Raf.  350/PJC/EAC 


18th  January,  1972. 


Or.  P.M.  Cundall , 
Mining  Sumyi  Ltd., 
Belroyd  load, 
leading, 

Barfca. 


Daar  Pata, 

Parade  mm  to  Introduca  you  to  the  facility  of  facaimile 

tranauiaaion. 

In  facsimile  a  photo call  la  caused  to  perform  a  raster  scan  over 
the  subject  copy.  The  variations  of  print  density  on  the  document 
causa  the  photocell  to  generate  an  analogous  electrical  video  signal. 
This  signal  is  used  to  undulate  a  carrier,  vbich  is  transmitted  to  a 
reaote  destination  over  a  radio  or  cable  coouunications  link. 

At  the  reaote  terminal,  demodulation  reconstructs  the  video 
*{*!*1,  «h[p!<  <•  ijtaH  t-n  mnHtil  itt  th«  density  nf  print  nrndnttrf  hy  a 
printing  device.  This  device  is  scanning  in  a  raster  scan  synchronised 
vlth  that  at  the  transmitting  terminal.  As  s  result,  a  facsind.lt 
copy  of  the  subject  document  is  productd. 

Probably  you  Uavv  use*  lot.  this  facility  iu  yOuT  organisation. 

Tours  sincerely, 

■fU. 

P.J.  CROSS 

Group  Leader  -  Facsimile  Research 


Figure  5-5  Modified  READ  (Row  7  of  Table  5-10) 
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APPENDIX  A 

DRAFT  RECOMMENDATION  (T.ii)  FOR  STANDARDIZATION 
OF  GROUP  3  FACSIMILE  APPARATUS  FOR  DOCUMENT  TRANSMISSION 


Recommendation  T .4  (Draft) 


STANDARDIZATION  OF  GROUP  3  FACSIMILE  APPARATUS 
FOR  DOCUMENT  TRANSMISSION 


The  CCITT, 

considering 

a)  that  Recommendation  T.2  refers  to  Group  I  type  apparatus  /or  ISO  A4 
document  transmission  over  a  telephone- type  circuit  in  approximately  six 
minutes; 

b)  that  Recommendation  T.3  refers  to  Group  2  type  apparatus  for  ISO  A4 
document  transmission  over  a  telephone-type  circuit  in  approximately 
three  minutes; 

c)  that  there  is  a  demand  for  Group  3  apparatus  which  enables  an  ISO  A4 
document  to  be  transmitted  over  a  telephone-type  circuit  in  approximately 
one  minute; 

d)  that  for  a  large  number  of  applications  black  and  white  reproduction  is 
sufficient; 

e)  that  such  a  service  may  be  requested  either  alternatively  with  telephone 
conversation,  or  when  either  or  both  stations  are  not  attended;  in  both 
cases,  the  facsimile  operation  will  follow  Recommendation  T.30, 

(unanimously)  declares  the  view 

that  Group  3  facsimile  apparatus  for  .use  on  the  genera/  switched  telephone 
network  and  international  leased  circuits  should  be  designed  and  operated  according  to 
the  following  standards  : 

1.  Scanning  track 

The  message  area  should  be  scanned  in  the  same  direction  in  the  trans¬ 
mitter  and  receiver.  Viewing  the  message  area  in  a  vertical  plane,  the  scanning 
direction  should  be  from  left  4o -right -and  subsequent  -scans-should  be  adjacent  and 
below  the  previous  scan. 

2.  Dimensions  of  apparatus 

The  following  dimensions  should  be  used  : 

2.1  A  normal  definition  standard  and  an  optional  higher  definition  standard  of 
3.85  and  7.7  line/mm  respectively  in  vertical  direction; 

2.2  1728  black  and  white  picture  elements  along  the  scanned  line; 

2.3  A  scanning  line  length  of  215  mm.  Other  scanning  line  lengths  moy  be 
employed  in  which  case  the  scanning  density  should  be  changed  to  maintain 
the  correct  picture  proportions; 

2.4  Input  documents  up  to  a  minimum  of  ISO  A4  size  should  be  accepted. 
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3,  Transmission  time  per  scanning  line 

A  total  scanning  line  is  defined  as  the  sum  of  DATA  bits  plus  any  required 
FiLL  bits  plus  the  EOL  bits. 

The  minimum  transmission  times  of  the  total  scanning  line  should  conform 
to  the  following  : 

3.1  20  milliseconds  recommended  standard, 

3.2  10  milliseconds  recognized  option  with  a  mandatory  fall-back  to  the  20 
milliseconds  standard, 

3.3  5  milliseconds  recognized  option  with  a  mandatory  fall-back  to  the 
10  milliseconds  option  and  the  20  milliseconas  standard, 

3.4  0  millisecond  recognized  option  with  a  mandatory  fall-back  to  the  5 
milliseconds  option,  and  the  10  milliseconds  option  and  the  20  milliseconds 
standard  and  an  optional  fall-back  to  the  40  milliseconds  option, 

3.5  40  milliseconds  recognized  option, 

3.6  10  milliseconds  recognized  option  with  a  mandatory  fall -bock  to  the  20 
milliseconds  standard, 

3.7  20  milliseconds  recommended  standard, 

3.8  40  milliseconds  recognized  option. 

The  identification  and  choice  of  this  minimum  transmission  time  is  to  be 
made  in  the  pre-message  (Phase  S)  portion  of  the  T.30  control  procedure. 

The  maximum  transmission  time  of  any  total  scanning  line  should  be  less 
than  5  seconds. 

Note: The  alternatives  3.1  to  3.5  apply  to  both  the  normal  and  optional  higher 
definition  standard  of  3.85  and  7.7  line/mm  respectively  in  the  vertical  direction. 
The  alternatives  3.6  to  3.8  apply  to  the  normal  definition  standard  and  the  times 
should  be  halved  for  the  higher  definition  standard. 

4.  Coding  Scheme 

4.1  One-dimensional  coding  scheme 

The  one-dimensicnol  run  length  encoding  scheme  recommended  for  Group  3 
apparatus  is  as  follows  : 
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DATA 

A  line  of  DATA  is  composed  of  a  series  of  variable  length  code  words. 
Each  code  word  represents  a  run  length  of  either  all  white  or  ail  block. 
White  runs  and  block  runs  alternate.  A  total  of  1 728  picture  elements 
represent  one  horizontal  scanning  line  of  the  document  of  standard  A4  size. 
In  order  to  insure  that  the  receiver  maintains  color  synchronization,  all 
DATA  lines  will  begin  with  a  white  run  length  code  word.  If  the  actual 
scanning  line  begins  with  a  black  run,  a  white  run  length  of  zero  will  be 
sent.  Block  or  white  run  lengths,  up  to  o  maximum  length  of  one  scanning 
line  (1728  picture  elements  or  pels)  are  defined  by  the  code  words  in  Tables 
I  and  2.  The  code  words  are  of  two  types  :  Terminating  Code  words  and 
Made  Up  Code  words.  Each  run  length  is  represented  by  either  one 
Terminating  Code  word  or  one  Make  Up  Code  word  followed  by  a 
Terminating  Code  word. 

Run  lengths  in  the  range  of  0  to  63  pels  ore  encoded  with  their  appropriate 
Terminating  Code  word.  Note  that  there  is  a  different  list  of  cod  words 
for  black  and  white  run  lengths. 

Run  lengths  in  the  range  of  64  to  1728  pels  are  encoded  first  by  the  Make 
Up  Code  word  representing  the  run  length  which  is  equal  to  or  shorter  than 
that  required.  This  is  then  followed  by  the  Terminating  Code  word 
representing  the  difference  between  the  required  run  length  and  the  run 
length  represented  by  the  Make  Up  Code. 

2  END  OF  LINE  (EOL) 


This  code  word  follows  each  line  of  DATA.  It  is  a  unique  code  word  that 
can  never  be  found  within  a  valid  line  of  DATA;  therefore,  resynchroniz- 
atian  after  an  error  burst  is  possible. 

In  addition,  this  signal  will  occur  prior  to  the  first  DATA  line  of  a  page. 
Format:  000000000001 


3  fill 

A  pause  may  be  placed  in  the  message  flow  by  transmitting  FILL.  FILL 
may  be  inserted  between  a  line  of  DATA  and  an  EOL,  but  never  within  a 
line  of  DATA.  FILL  must  be  added  to  insure  that  each  line  of  DATA,  FILL 
and  EOL  exceeds  the  minimum  transmission  time  of  a  total  scanning  line 
established  in  the  pre-message  control  procedure.  The  maximum  length 
for  a  single  line  of  FILL  is  5  seconds,  after  which  the  receiver  may 
disconnect.  i 

Format:  variable  length  string  of  0's. 
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4.1.4  RETURN  TO  CONTROL  (RTC) 

The  end  of  a  document  transmission  is  indicated  by  sending  six  consecutive 
EOL's.  Following  the  RTC  signal,  the  transmitter  will  send  the  post 
message  commands  in  the  standard  T.30  framed  formot. 

Format:  00000000000 1 - 00000000000  I 

(total  of  6  times) 

To  further  clarify  the  relationship  of  the  signals  defined  herein,  the  Figures 
I  and  2  are  offered.  Figure  I  shows  several  scan  lines  of  data  starting  at  the 
beginning  of  a  transmitted  page.  Figure  2  shows  the  last  line  of  a  page. 


of  a  total  scan- 


ing  line 


FIGURE  I 


FIGURE  2 
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TA8LE  I 


Terminotirq  Codct 


White  Run 

Slock  Run 

Length 

Code  Word 

Length 

Code  Word 

0 

00110101 

0 

00001 1011 1 

1 

000 1 1 1 

1 

010 

2 

0111 

2 

II 

3 

1000 

3 

10 

4 

1011 

4 

Oil 

S 

1100 

5 

0011 

4 

1110 

4 

0010 

7 

mi 

7 

000 1 1 

3 

100!  1 

8 

000101 

9 

10100 

9 

000100 

10 

001 1 1 

10 

0000100 

11 

01000 

II 

0000101 

12 

001000 

12 

0000 1 1 1 

13 

OOOOll 

13 

OOOOOI 00 

14 

1 10100 

14 

OOOOOI 1 1 

IS 

1 10 101 

15 

OOOOIIOOO 

14 

101010 

14 

OOOOO 101 1 1 

17  * 

10 10 II 

17 

OOOOOIIOOO 

18 

0 100 1 1 1 

18 

OOOOOOIOOO 

19 

0001100 

19 

0000 1 100 1 1 1 

20 

0001000 

20 

00001 10 1000 

21 

00 10 1 1 1 

21 

OOOOIIOI 100 

22 

OOOOOI 1 

22 

OOOOO  1  to  i  1 1 

23 

0000100 

23 

OOOOOIOIOOO 

24 

010 1000 

24 

OOOOOOIOIII 

25 

010 10 1 1 

25 

OOOOOOI 1000 

24 

001001 1 

24 

OOOOI 1001010 

27 

0100100 

27 

0000  MOO  10 1 1 

28 

0011000 

28 

0000 1 1001 100 

29 

00000010 

29 

OOOOI 1001 101 

30 

OOOOOOI 1 

30 

OOOOOI 101000 

31 

0001 1010 

31 

OOOOOI to  100 1 

32 

0001 1011 

32 

OOOOOIIOIOIO 

33 

000 100 10 

33 

OOOOO  1 10 10 1 1 

34 

000 100 II 

34 

OOOOIIOIOOIO 

35 

000 10 100 

35 

OOOOI 10  tool  1 

34 

00010101 

34 

OOOOIIOIOIOO 

37 

000101 10 

37 

OOOOI  1010  101 

38 

000)01 1 1 

38 

OOOOI 10 10 1 10 

39 

OOIOIOOO 

39 

OOOOI  1010!  1 1 

40 

00  10  100 1 

40 

000001101100 

41 

00  1010  10 

41 

OOOOOI 101 101 

42 

00 10 10  1 1 

42 

oooonoiioio 

43 

00101101 

43 

OOOOUOIIOII 

44 

00  10 1 10 1 

44 

COOOO'OIOIOO 

45 

00000100 

45 

OOOOO  10  iOiOl 

44 

00000101 

44 

oooooioiono 

47 

0000 10 10 

47 

OOOOO  to  10  1 1  1 

48 

0000 10 II 

48 

COOOOIIDCIOO 

49 

010 100 10 

49 

OOOOOIIOOIOI 

50 

010)00 1 ) 

50 

OOOOOIOIOOIO 

51 

010 10 100 

51 

OOOOO 10 100 1 1 

52 

01010 101 

52 

OOOOOOIOOIOO 

S3 

00100100 

53 

000000 ( 10 1 1 1 

54 

00 100 10 1 

54 

OOOOOOII 1000 

55 

oionooo 

55 

0000001001 1 1 

54 

010M00I 

54 

OOOOOOIOIOOO 

57 

010 1 10 10 

S7 

00000101 1000 

58 

0101 101 1 

S8 

OOOOOIOIIOOI 

59 

0100 10 10 

59 

OOCOOOIOIOII 

40 

OIOOIOU 

40 

OOOOOOIOIIOO 

41 

001 100(0 

41 

OOOOOIOI 1010 

42 

001 100) ) 

42 

000001100110 

43 

00110100 

43 

OOOOOI 1001 1 1 
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TABLE  2 
Make  Up  Codes 


White  Run  Block  Run 


Lengths 

Code  Word 

Lengths 

Code  Word 

64 

1  101  1 

64 

000000 II 1 1 

128 

10010 

128 

00001 1001000 

192 

0101 1 1 

192 

00001 1001001 

256 

01 101 1 1 

256 

00000101 101 1 

320 

001 101 10 

320 

0000001 1001 1 

384 

00! 101 l 1 

384 

0000001 10100 

448 

01 100100 

'  448 

000000 1 10101 

512 

01  100101 

512 

0000001 101 100 

576 

0! 1 0 1 000 

576 

0000001 101 101 

640 

01 1001  1  1 

640 

000000 100 10 10 

704 

01  1001 100 

704 

000000 100 101 1 

768 

01  1001 101 

768 

0000001001 100 

832 

01 10 100 10 

832 

0000001001 101 

896 

*  oiioiooii 

896 

0000001 1 10010 

960 

01  1 0 1 0 1 00 

960 

ooooooi  noon 

1024 

01  10 10 10 1 

1024 

0000001 1 10 100 

1088 

01 10 10  1  10 

1088 

0000001 1 1010 1 

1152 

01 10101  1  1 

1  152 

0000001 1 101 10 

1216 

01 101 1000 

1216 

0000001 1 101 1 1 

1280 

01  101 1001 

1280 

000000 10 100 10 

1344 

01 101 1010 

1344 

000000 10 1001 1 

1408 

01 101 1011 

1408 

000000 10 10 100 

1472 

01001 1000 

1470 

0000001010101 

1536 

0100(1001 

1536 

000000 101 1010 

1600 

01001 1010 

1600 

000000101 1011 

1664 

01  1000 

1664 

0000001 100 100 

1728 

01001 101 1 

1728 

0000001 100 101 

EOL 

000000000001 

EOL 

000000000001 

Note: 

It  is  recognized  that  machines 

exist  which  accommodate  larger  paper 

widths 

whilst  maintaining  the  standard 

horizontal  resolution. 

This  option  has 

been  provided  for  by  the  addition  of  the  Make  Up  Code  Set  defined  as  follows: 


Run  Length 
'Black  and  White) 

Make  Up  Codes 

1792 

00000001000 

1856 

00000001100 

1920 

00000001 101 

1984 

0000000 100 10 

2048 

0000000 100 II 

2112 

0000000 10 100 

2176 

0000000 10 101 

2240 

000000010! 10 

2304 

0000000 1 0 l 1 1 

2368  “ 

00000001 1 100 

2432 

00000001  I  101 

2496 

0000000! 1 1 10 

2560 

0000000 1 1 1 1 1 
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The  identification  and  choice  of  either  the  standard  code  table  or  the 
extended  code  table  is  to  be  made  in  the  pre-message  (Phase  B)  portion  of  the  T.30 
control  procedures. 


4.2  Two  dimensional  coding  scheme 


The  two-dimensional  coding  scheme  is  an  optional  extension  of  the  one¬ 
dimensional  coding  scheme  specified  in  Paragraph  4.1  and  is  as  follows: 

4.2.!  DATA 

4.2.1. 1  Parameter -K 


In  order  to  limit  the  disturbed  area  in  the  event  of  transmission  errors, 
after  each  line  coded  one-dimensionally  at  most  K-l  successive  lines  shall  be 
coded  tWo-dimensicnally.  The  value  of  K  shall  be  set  as  follows: 

Normal  resolution  standard:  K=2 
Higher  resolution  standard:  K=4 

Note  I:  Some  Administrations  pointed  out  that  for  higher  resolution  K  may 

optionally  be  set  to  a  lower  value. 

Note  2:  Some  Administrations  reserve  the  right  to  approve  only  such  appar¬ 

atus  for  use  in  the  facsimile  service  in  their  respective  countries  which  will 
be  able  to  produce  a  visible  sign  on  its  received  facsimile  message 
indicating  that  two-dimensional  coding  has  been  used  in  the  transmission 
process. 

4.2. 1.2  One  dimensional  coding 

This  conforms  with  the  description  of  DATA,  Paragraph  4.1.1. 

4.2. 1.3  T wo-dimensional  coding 

This  is  a  line-by-line  coding  method  in  which  the  position  of  each  changing 
picture  element  on  the  current  or  coding  line  is  coded  with  respect  to  the 
position  of  a  corresponding  reference  element  situated  on  either  the  coding  line 
or  the  reference  line  which  lies  immediately  above  the  coding  line.  After  the 
coding  line  has  been  coded  it  becomes  the  reference  line  for  the  next  coding  line. 

a)  Definition  of  changing  picture  elements  (see  Figure  3) 

A  changing  element  is  defined  as  an  element  whose  "color"  (i.e. 
black  or  white)  is  different  from  that  of  the  previous  element  along 
the  same  scan  line. 
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a  The  reference  or  starting  changing  element  on  the  coding  line. 
At  the  start  of  the  coding  line  a  is  set  on  an  imaginary  white 
changing  element  situated  just  before  the  first  element  on  the 
line.  During  the  coding  of  the  coding  line,  the  position  of  a  is 
defined  by  the  previous  coding  mode.  (See  Paragraph  A .2. 1 -3 /b) 

a  j  The  next  changing  element  to  the  right  of  aQ  on  the  coding  line. 

02  The  next  changing  element  to  the  right  of  Oj  on  the  coding  line. 

b|  The  first  changing  element  on  the  reference  line  to  the  right  of 

ag  and  of  opposite  color  to  ag.  . 

b2  The  next  changing  element  to  the  right  of  b|  on  the  reference 
line. 


FIGURE  3  -  Changing  Picture  Elements 

b)  Coding  Modes 


One  of  three  coding  modes  are  chosen  according  to  the  coding 
procedure  described  .ia.  Parag raph  4.2. 1.3, c  to  code  the  position  of 
each  changing  element  along  the  coding  line.  Examples  of  the  three 
coding  modes  are  given  in  Figures  4,  5  and  6. 

(i)  Pass  mode 


This  mode  is  identified  when  the  position  of  b2  lies  to  the  left  of  aj. 


When  this  mode  has  been  coded,  a  is  set  on  the  element  of  the 
coding  line  below  b2  in  preparation  for  the  next  coding,  (i.e.  on  aO 


reference  line 
coding  line 


FIGURE  4  -  Pass  mode 
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However,  the  state  where  occurs  just  above  a,,  as  shown  in  Figure 
5,  is  not  considered  as  a  Pass  mode. 


*1 


FIGURE  5  -  An  example  not  corresponding  to  a  Pass  mode 

(ii)  Vertical  mode 

When  thi&  mode  is  identified,  the  position  of  0|  is  coded  relative  to  the  position 
of  b,.  The  relative  distance  a,b,  can  take  on  one  of  seven  values  V(0),  VR(I), 
V^(Z),  Vq(3),  V^(l),  V^(2)  and  V,  (3),  each  of  which  is  represented  by  a  separate 
code  wora.  The  subscripts  R  andT.  indicate  that  a,  is  to  the  right  or  left  respec¬ 
tively  of  bj  and  the  number  in  brackets  indicates  the  value  of  the  distance  a.b|. 
After  vertical  mode  coding  has  occurred,  the  position  of  a  is  set  on  a,,  (see 
Figure  6)  ° 

(iii)  Horizontal  mode 

When  this  mode  is  identified,  both  the  run-lengths  aQa|  and  aja^are  coded  using 
the  code  words  H  +  M(a  aj)  +  M(aja2)-  hi  is  the  flag  code  word^OOl'  taken  from 
the  two-dimensional  coSe  table  (Tatfle  3).  M(aoO|)  and  MfcjOj)  are  code  words 
which  represent  the  length  and  "color"  of  the  runs  a  a.  and  respectively 

and  are  taken  from  the  appropriate  white  or  black  one-dimensional  code  tables 
(Tables  I  and  2).  After  a  horizontal  mode  coding,  the  position  of  aQ  is  set  on  a2* 
(see  Figure  6) 


Vertical  mode 


Horizontal  mode 

FIGURE  6  -  Vertical  mode  and  Horizontal  mode 


A-9 


-  10  - 


c)  Coding  Procedure 

The  coding  procedure  identifies  the  coding  mode  that  is  to  be  used  to  code 
each  changing  element  along  the  coding  line.  When  one  of  the  three  coding 
modes  has  been  identified,  an  appropriate  code  word  is  selected  from  the  code 
table  given  in  Table  3.  The  coding  procedure  is  formally  defined  by  "the  flow 
diagram  given  in  Figure  9. 

Note:  It  does  not  affect  compatibility  to  restrict  the  use  of  Pass  mode  in  the 
encoder  to  a  single  Pass  mode.  Variations  of  the  algorithm  which  do  not 
affect  compatibility  should  be  the  subject  of  further  study. 

Step  I 

i)  If  a  pass  mode  is  identified  this  is  coded  using  the  code  word  '0001'  (Table 
3).  After  this  processing,  picture  element  just  under  b2  is  regarded  as 
the  new  starting  picture  element  oq  for  the  next  coding,  (see  Figure  4) 

ii)  If  a  pass  mode  is  not  detected  then  proceed  to  Step  2. 

Step  2 

i)  Determine  the  absolute  value  of  the  relative  distance  °|b|. 

ii)  If  Ojb|  4  3,  as  shown  in  Table  3,  a |b |  is  coded  by  Vertical  mode,  after 
whicn  position  0|  is  regarded  as  the  new  starting  picture  element  aQ  for 
the  next  coding. 

iii)  If  a j b |  y  3,  as  shown  in  Table  3,  following  Horizontal  mode  code  '00 1', 

aQa|  and  are  respectively  coded  by  one-dimensional  coding.  After 

this  processing  position  a^  is  regarded  as  the  new  starting  picture  element 
aQ  for  the  next  coding. 
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TABLE  3 

Two-dimensional  code  table 


MODE 

ELEMENTS  TO  BE 
CODED 

NOTATION 

CODE  WORD  ' 

PASS 

b|,b2 

P 

0001  • 

HORIZONTAL 

°oal‘ala2 

H 

001  +  M(o  a.)  + 

O  1 

^I^Note  1 

VERTICAL 

0|  just 
under  b| 

ESI 

V(0) 

1 

Oj  to  the 
right  of 
bl 

Bl 

VrO 

01  1 

a,b|=2 

Vr(2) 

0000 1 1 

o,b,  =3 

Vr(3) 

000001 1 

Oj  to  the 
left  of 
bl 

m 

VL(!) 

010 

a,b1  =  2 

VL(2) 

000010 

m 

Vl(3) 

0000010 

EXTENSION 

2-D  (extensions) 
l-D  (extensions) 

Note  2 

000000 1 xxx 
00000000 1 xxx 

Note  I  Code  M(  )  of  Horizontal  mode  represents  the  code  words  in  Tables  I 
and  2,  Paragraph  4.1.1. 

Note  2  It  is  suggested  that  Uncompressed  mode  is  recognized  as  an  optional 
extension  of  the  two-dimensional  coding  scheme  for  Group  3  apparatus.  The  bit 
assignment  for  the  xxx  bits  is  I  I  I  for  the  Uncompressed  mode  of  operation. The 
code  words  with  this  bit  assignment  are  used  to  switch  into  Uncompressed  mode. 
Table  4  gives  an  example  of  a  code  table  for  Uncompressed  mode  and  the  exit 
from  it. 

Note  3  Further  study  is  needed  to  define  other  unspecified  xxx  bit  assign- 
ments  and  their  use  for  any  further  extensions. 
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TABLE  4 

Uncompressed  mode  code  table 


Image  Pattern 


Code  Word 


01 

001 

0001 

0000 

00000 


01 

00! 

0001 

00001 

00000 1 


Exit  Image  Pattern 


Code  Word 


0 

00 

000 

0000 


000000  IT 
0000000 1 T 
00000000 1 T 
000000000  IT 
0000000000 1 T 


T  denptes  a  tag  bit  which  tells  the  color  of  the  next  run.  (black  =  I,  white 

=  0) 

d)  Processing  the  first  and  last  picture  elements  in  o  line 

(i)  Processing  the  first  picture  element 

The  first  starting  picture  element  aQ  on  each  coding  line  is  imaginarily  set 
at  a  position  just  before  the  first  picture  element,  and  is  regarded  as  a  white 
picture  element.  (4.2. 1.3, a) 

The  first  run  length  on  a  line  aQ0|  is  replaced  by  aQa|-l.  Therefore,  if  the 
first  run  is  black  and  is  deemed  to  be  coded  by  horizontal  mode  coding,  then  the 
first  code  word  Mfa^aj}  corresponds  to  a  white  run  of  zero  length,  (see  Figure 
10,  Example  5) 

(ii)  Processing  the  last  picture  element 

The  coding  of  the  coding  line  continues  until  the  position  of  the  imaginary 
changing  element  situated  just  after  the  lost  actual  element  has  been  coded. 
This  may  be  coded  as  0|  or  02-  Also,  if  b|  and/or  bj  are  not  detected  at  any 
time  during  the  coding  of  the  line,  they  ore  positioned  on  the  imaginary  chonging 
element  situated  just  after  the  last  actual  picture  element  on  the  reference  line. 
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4.2.2  LINE  SYNCHRONIZATION  CODE  WORD 


To  the  end  of  every  coded  line  is  odded  the  end-of-line  (EOL)  code  word 
'000000000001'.  The  EOL  codeword  is  followed  by  a  single  tog  bit  which 
indicates  whether  one-  or  two-dimensional  coding  is  used  for  the  next  line. 

Format: 

EOL  +  I  :  one-dimensional  coding  of  next  line 
EOL  *  0  :  two-dimensional  coding  of  next  line 


4.2.3  FILL 


FILL  is  inserted  between  a  line  of  DATA  and  the  line  synchronization 
signal,  EOL  +  tog  bit,  but  is  not  inserted  in  DATA. 

Format  :  variable  length  string  of  0's. 

4.2.4  RETURN  TO  CONTROL  (RTC) 

The  format  used  is  six  consecutive  line  synchronization  code  words,  i.e.,  6  X 
(EOL+I). 

To  further  clarify  the  relationship  of  the  signals  defined  herein,  Figures  7 
and  8  are  offered  in  the  case  of  K  *  2.  Figure  7  shows  several  scan  lines  of  data 
starting  at  the  beginning  of  a  transmitted  page.  Figure  8  shows  the  last  several  lines 
of  a  page. 


EOL 
♦  "1" 

DATA 

(one-dimensional) 

EOL 
+  "O" 

DATA 
( two- 
dimensi¬ 
onal) 

FILL 

EOL 
+  "1" 

DATA 

(one-dimensional ) 

— 

• 

>  T  I  <  T 


T:  minimum  transmit  time  of  a  total  scanning  line 


FIGURE  7  -  Message  transmission  (first  part  of  page) 
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4.2.5  Coding  Examples 

Figure  (10)  shows  coding  examples  of  the  first  part  of  scanning  lines  and 
Figure  (I  I)  coding  examples  of  the  last  part,  while  Figure  (12)  shows  other  coding 
examples.  The  notations  P,  H  and  V  in  the  figures  are,  as  shown  in  Table  3,  the 
symbols  for  Pass  mode,  Horizontal  mode  and  Vertical  mode  respectively.  The 
picture  elements  marked  with  black  spots  indicate  the  changing  picture  elements 
to  be  coded. 


FIGURE  10  -  Coding  examples  :  first  part  of  scanning  line 

j t 
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1728  1723 


FIGURE  1 1  -  Coding  examples  :  Iasi  part  of  scanning  line 
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5.  Modulation  and  demodulation 

Groups  3  apparatus  operating  on  the  general  switched  telephone  network 
shall  utilize  the  modulation,  scrambler,  equalization  and  timing  signals 
defined  in  CClTT  Recommendaf ion  V.27fer,  specifically  the  preamble, 
sections  2,  3,  8,  10,  I  I  and  the  Appendix. 

5.1  The  training  signal  to  be  used  shall  be  the  long  training  sequence  with 
protection  against  talker  echo,  (reference  V. 27 ter,  section  2.5.1 
Table  3/V.27ter) 

5.2  The  data  signalling  rates  to  be  used  are  4800  bit/s  and  2400  bit/s  as 
defined  in  Recommendation  V. 27 ter. 

Note  I  Some  Administrations  pointed  out  that  it  would  not  be  possible  to 
guarantee  the  service  at  a  data  signalling  rate  higher  than  2400  bit/s. 

Note  2  •  It  should  be  noted  that  there  are  equipments  in  service  using,  inter 

alia,  other  modulation  methods. 

Note  3  Where  quality  of  communication  service  can  successfully  support 
higher  speed  operation,  such  as  may  be  possible  on  leosed  circuits  or  high 
quality  switched  circuits.  Group  3  apparatus  may  optionally  utilize  the 
modulation,  scrambler,  equalization  and  timing  signals  defined  in  CClTT 
Recommendat ion  V.29,  specifically  sections  I,  2,  3,  4,  9,  10,  12  and  13. 
Under  this  option  the  data  should  be  non-mult  ip  lexed  and  limited  to  the 
rates  of  9600  bit/s  and  7200  bit/s. 

6.  Power  at  the  transmitter 

The  average  power  should  be  adjustable  from  -ISdBm  to  OdBm  but  the 
equipment  should  be  so  designed  that  there  is  no  possibility  of  this  adjust¬ 
ment  being  tampered  with  by  an  operator. 

7.  Power  at  the  receiver  input 

The  receiving  apparatus  should  be  capable  of  functioning  correctly  when 
the  received  signal  level  is  within  the  range  of  OdBm  to  -40dBm.  No 
control  of  receiver  sensitivity  should  be  provided  for  operator  use. 
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APPENDIX  C 

CODE  LISTING  FOR  THE  MODIFIED  READ  PROGRAM 


PROGRAM  NAME 

FUNCTION 

PAGE 

MODREAD 

Main  Program 

C-1 

CODELN 

Line  Code  Subroutine 
of  "Encode"  Subroutine 

C-18 

ERRMES 

Error  Measurement  Subroutine 

C-19 

MI2B 

Packing  Subroutine 

C-21 

IUB 

Unpacking  Subroutine 

C-22 

STATS 

Computer  Statistics  of 

Coded  Lines 

C-23 

n^n  f'nn  on 


UNCLASSTFI  ED 


START 

C 

C 

c 

c 

c 

c 

c 

L 


OF  OCEC  UPt  INT  pTGh/.n  DSN*  M E=  F  13 0 2  . MOD R E AO .FP2 T 

PROGRAM  M C  DRr  *  D 


<f./02/°  0 
<6/ 02/9  0 
<6/02/60 
<o/  C2  /P  0 
<6/02/9.0 
<6/02/90 


ADDCD  VA)I/BLE  F1UEMD  TO  LGGIC  CCMMCK  BLOCK> 

.'DDCD  V^-<1/:3LE  FILEMP  T-  LrG  T  C  4L  ST  *  TF  MFNT  > 

A  POc  D  FILENi)  A  SS  T  GN'M  ENT  STATEMENT  IN  I  N I  TI  AL  I  Z  ATT  DNS  > 
ADD?  D  MASSING  P*.  F.A.  ME  TE  F  TO  crrMES  C«LL-DI*G> 

ADDED  PASSING  PARAMETER  T r  rnorLN  CA LL-CODE> 

CHANGED  tKR 3RS  DIMENSION  FROM  9000  TC  10000> 


IM=LlCTT  INTEGER! A-Z) 

REAL  CF3, CF4, EF FATE 

C*******  LABELED  COMMON  /G32UIT/  ******* 
C 


CCM-OU  /G32  3I  ’/M'  S<(  32)  ,C  OMASK{  32).LIBIT(32>.LZEIT(32> 
INTEGER  MASK. CC AAS< . Ll BIT .LZBIT 
L 

COMMON/BUFF/PEL  3JF{ 60, 2 ) ,CDBUF( 2 AO)  ,OTBUF (60.2)  , 

*  STFaUF<  240),  ST  AT ( 3000 ) 

CCMMON/HUFF/CODE(  3,92,2)  «C  OD  E  RD (3,11) 

COMMCN/EP  AY /FT f D  r  S (  10000  ) 

C*********«*************  FILE  DEFINITIONS  ******************** 

c 

C  CMWCN/F  ILES/’C  =M  .  L  P  F  1  L  .  PELF  IL.CTFIL.ERFIL 


LABELLED  COMMON 


VARIABLES  ********************** 


COWMEN /I  VAR /PEL  M-*  X  ,  VR E 5 , E PHA SE . C MPM A X . E RR  MCD.LT  NMAX  ,K 
C  CMMCN/PV  A*  /T  NL  NNC  .  CT  LNNO.OT  FLW  ,  T  NE LD  »  FDEL=>  ,  OT ^LP  . CDF L»’  , 

*  O  DELE  T ,  INELCT.TCDATA ,TCDEL , E RR PKT , F P RCFF , ERRL I M , 

*  Err CNT.  TNLNCT .Cl  NSEC. 0  NEC  NT .LNN03F. KCNT. 

*  I  NE  C  3 , J  K* EF, CTCOD.OTRFF , STFB  IT 
CO  -W  ON/  IC  HA  r./DD,  I  I  ,  M>1,  TT ,MN, YY 

COWMCN/LOGI  C/SFa- CH , or.  G.  SYNC , WO  ITT. ZEE” , LE  FT , C  FCrL , C  N?  ,  *  H* TE, 
AF  IL  END 

LOGICAL  SEAT  CH, DlAG.SYNC , WR ITE.LEFT ,0  HC  OL. ONE,* FITE, FILFND 


READ  INPUT  PARAMCTEPS 
9  3  wRI TE ( 6. 1 00  ) 

100  FORM»T(  • SPARAMET^OS  :  INPUT(=1),  T  DEF « ULT ( =D ) ?  •  ) 
READ < 5. 1 1 0. EF 0=90 )  INSM 
110  FORMa  T( A  1  ) 

IF  { I NS* • F3 • DO )  GO  TE  315 
IF  (INSW.NE.II)  G?  TO  >0 

IF  AO  DIAGNOSTIC  SwMCH 

1 1  A  WR !TE( 6, 1  15  ) 

115  FCFW4.T  <  •  SDI  AGNC  STIC  F=INTC’JT?  (Y  C r  N>:  •> 

PE»r(5,110)  INS* 

IF  (  I NSW. EG.  YY  I  GO  T  C  <10 
IF( INSW.E0.NN)  GC  T~  120 
GO  TC  1  1  A 
1  1  D  CONTINUE 

DI t  Qa . TRUE. 

a  E  4  D  MAXIMUM  number  : F  =  FLS  ’EF  LINE 

120  CONTINUE 

*R : TE(  5,  1  30  ) 

120  FORMAT (•  *FNT<=  =  MAXIMUM  NU  MBEF  DF  DE  L  S  PrR  LINE!  •) 
F  E4D<  5.  1  40.F='  =  1?0)  PELMAX 
1  A  0  FJFMAT(IA) 

IF ( =2L M  'X. SC. ].  4ND. PLL’UX .LE.  1 ’23)  GO  TO  160 
*R  I Tt ( 6,  1 50  )  oflm\X 

150  FC'.V' T(  •ONUMBE ,*  OUT  C  F  F.ANGE  (  =  ,.16,,)'> 

Gr  TO  120 

READ  VC'TIC'L  SAMPLING 

1  e  0  CCN  T  TfjuF 

*F  r  TE(  5, 1  70  ) 

17)  FC  F  'AT  (  •  SEN  TFr  V'TT’CM  SAMPLING:  •) 

RE  »J(  5,  If.  0,  EF  3  =  160  )  V'’ES 
ISO  FC  RM  VT (  I  2  ) 

JT ( YOES.Gr.l.f ND.VnLS.Lc. 10)  GO  TC  lc0 
*-  T  T  £(  f  ,  1  CQ  )  V'  =  5 
GC  TC  160 

( 

A  It  JO  C\N*  METER  K 
C 

ico  continue 

*R ! Tf ( 6. 1 r2 ) 


0000001 0 
0000001 1 
0000001  2 
0000001  3 
0000001  A 
0000001 5 
00000016 
0000001 7 
00000020 
00000030 
000  00  0 A  0 
00000050 
00000060 
00000070 
00000050 
000000=0 
00000100 
00000  1  1  0, 
0000C1 20 
00000130 
000001  AO 
00000150 

OOOOOl so 

OOOOOl’O 
00000130 
00000190 
0000020C 
00000210 
00000220 
00000230 
000  OC  2 A  C 
000  OC  250 
00000251 
00000260 
00000270 
000  002?  0 
000002=  0 
000  OD?  0  0 
0  000031 0 
000  00320 
00000230 
00000340 
00000350 
00000360 
000  00?”0 
000  003S  0 
ODC  003=0 
OOOOOAOO 
0000= A! C 
000  OOA’O 
000  00a 30 
0  00  004  AO 
0  0  0  0  0  A  5  0 
00003460 
OOC  034  ’  0 
000034  ? 0 
000  004=0 
000  00500 
0  00  on 51  0 
0  00  00 R 2  0 
000  00520 
00003540 
00000550 
O  00  TOE  L  C 
0  00  30 E 7  C 
003005=0 
00000r" 3 
000  00 f  0 
0  0  0  O  3  t  1  0 
000  006?  0 
OOCOO»?= 

000  0064  0 
00000650 
000  30f  s  0 
003  0  =  6’ 0 
3  00  006=0 
0  00  0  06=  3 
0  00  03  ”  3 
00333’! = 
030  =0  7? ? 
0  00  0  3”  = 


c~\ 


JNCL-"  SS  Ir  1F  = 


UNCLASSIFIED 


1 L  ■ 

fi.-wJTC^MFf  ^'CFMLTCn  k:  •) 

00000 ''ao 

":-.;isi4i,e^'-icoi  k 

000  0075  0 

:  -  ( r GF  .  1  .f.'it.K  F.  3000  )  GL  T  C  300 

000  00780 

*  1  T  ■_  (  •  ,  1  5  0  )  K 

003  007-'  C 

GL  PL  KO 

00000730 

L 

000  007=  0 

~ 

r  ao  f  g-'p  piirr^N  =>mase 

OOOOOFOO 

C 

000  0081  0 

20  J 

CCN  F  ! NUF 

000  00?  20 

*  R  1  T  F  (  6 , 2  1  0  ) 

00000830 

21  0 

F  0L  vl  T  (  •  SENTE0  E  P  "  j  F  P  A  T  T  £,-.  N  PHASE:  •) 

0000084  0 

R  fc  A  p  (  3 «  r20*FCr=200)  FPHASE 

000  OOPS  0 

220 

Ful'UTUl  ) 

00000F80 

I  F  (  pH,1  SE  .GF.  f  .  *.vr>.  FPHPSE  .LE.  3)  GF  Tr'  240 

00000570' 

HllITE(hflrO)  !3Hf  SE 

000  OOPS  O' 

GC  T 3  2C0 

oooooeso 

c 

00000500 

< 

5F  A'}  MINIMUM  OCMPrrSSED  LINE  LENGTH 

000  00 0 1  0 

c 

000  00-  20' 

24  0 

CON  T  INUE 

000  00-30' 

*  n  !  T  «=.  ( f. .  .  J  1-  0  ) 

000  005»0 

?FJ 

F3N -U  T  <  *  SF\ TP  ~  MINIMUM  COMPRESSED  L  I  Nr  LENGTH:  •) 

00000950 

nEAFl'!,  1  AC*  F".  ~  -  2  4  0  )  CMPM  AX 

000  00580 

IT  |  [  x  ,CF  ,n.  »’■%  CM3TU.LE.172P)  GC  T°  32  0 

000  00C'T  0 

WR  !  T  E  (  ;<  .  1  HO  )  f'lPMe  X 

00000530 

GC  Tw  2  40 

000  009^*0 

c 

00001  000- 

c 

F  A3  NJ«t-<F-  3  F  SCAN  _If.ES  T2  3E  PROCESSED 

00001  01  0' 

32  0 

CCN  T  IMJF 

00001020 

*R  I  T  F  (  t  ,  3  30  ) 

00001 03 0 

33  0 

F  CP M/  T  ( • SNJMFFf  ]f  SCAN  LINES  TC  EE  PPCCESSeD=?  •) 

C  0  0  0 1  0  4  0 

RE  5  0(5. 1*0.  FTP  =  3?  0)  L  INMAX 

000  03  OSO 

ir  (  L  IN  A  A*  ...r  .  1  .  AND.  L  I  NMVX  .LF  .3000)  GC  TO  250 

00001080 

«  I  TE  (  6  .  1  r  0  >  l  I  NMA  X 

00001  07  3 

G  Z  TC  f  2  0 

00001 oeo 

c 

00001  p°0 

c 

r 

f  AD  5  m C  ~  r  y  '  n=r 

0000! 1 00 

c 

00001 1  1  0 

?e  o 

crMiNur 

00001 120 

WRITE! 6. 2 °0) 

00001130 

2r  ) 

FCP.M  AT  (  •  iFr'FCr  MOOL  =  ?  (  M=  MENU  PL  .  T  =  T  A  ’F  ,  N=  N  0  ERF  CPS) 

•)  00001140 

READ!  8.  1  1  0,ERP=2eO)  F  F  PMC  D 

00001 180 

IF  (FRRMC0.EC.M..1)  GO  TC.  300 

00001 180 

ir  (  £13  -tm.-:  a,  tt  >  c°  to  315 

noo  01 1 7  0 

IF  < FRRMCD.NF.NN  )  GC  TO  280 

000  01 1 n  0 

c. t:  ij  3 so 

00001 1 50 

c 

00001 200 

t 

i 

-AO  F-7VP  LOCATIONS 

0000121 0 

c 

000  01 220 

30  0 

COIN  T  INUE 

0000! 230 

EF.-LlM-l 

00001240 

3  o  ■ ; 

- EF  0(  Ei  1 40 )  ERRORS!  ERRLI M ) 

00001 2S0 

IF  (  -  RRCCS  (£RR|.  T  M)  .Eu.0090  )  GC  TC  310 

00001 280 

E  F  I.  I  M  =  f-  Pt  IM4  1 

000  01 0 

GO  TO  30  F 

000  01 2 P  0 

3  1  0 

CCN  I  I  N'JF 

000  01  2°  0 

FT  H  I  m-f  L  IM-  1 

00001300 

;c  TO  3  83 

000  01 31  0 

c 

00001 320 

c 

"8 

l.'C  FRROC  T.*PF  PILE  AND  COEN 

00001 330 

c 

00001340 

3  1  3 

CONI IMUE 

00001350 

c 

00001 380 

EC  HI  I M = 1 

00001370 

RE  AO  (  3.  3  1  9,  ENP  =  31  7»  E  f. POP.  S(  E RRL I  M ) 

000  01  3?  0 

f  9  r  l  i*-Fppt_  jm  +  1 

000013-0 

31  •> 

F  E“0(  3  .  3  1  8,  END-  31  ?)  E  FirlC.  F«  5  (  ETRL  I  M  J 

00001 400 

31  3 

F  0  R  M  4  T  (  I  1  6  > 

00001  41  0 

EFN;,.  Fs  (  EF  PL  I  M  1  =  FFrDCS  {  ECCLT  M  )  ff-RPCPS  (EPEL1M-1  ) 

00001420 

E  R  A  L  I  M  =  F  R  F-.l  I  M  ♦  3 

00001 430 

GC  TO  318 

00001440 

31  7 

FPF  L  I  M  =  ejr.L  IM-  1 

00001480 

c 

000  01 450 

350 

CONTINUE 

00001 470 

c 

00001440 

360 

CCN  T INUE 

00001 4:0 

c 

tfi 

“ITC  I N 3 1 1 T  ''ttU'^ycc  $ 

00001500 

c 

000  01  51  0 

*ni  TEI  6.4  00  J  FFIV,X,  VF.ESiKi  EPHASE  »  C  MP  VAX»LT  8  MAX 

00001520 

AO  0 

FCRm  •  T  (  *  1  ’\|PUT  p:  P  a  METERS  :  *  / 

00001530 

*  *0M 4XIMUM  NJMREK  OF  PELS  ORR  LINE=',I6/ 

00001 84  0 

*  ':v-'ti'1l  sampling:  n=*,14/ 

00001550 

L-Z- 


UNCLASSIF’EP 


n^o  r.  nn  r^rn  n  n  r\  r\nn 


UNCLASSIFIED 


*  '0P4RAMETER  K  =*,14/ 

*  'OERROE  PATT  Ef  N  PHASE  =*,14/ 

*  '0MIN1MUM  CDMPFESSCD  LINE  LENGTH  =*,I4,»  BITS*/ 

*  •  0  NJ  MR  EF  7  F  SCAN  LINES  TO  BE  PROCESSED  :',IM 
IF  (  wR5MCD.EQ.NN  >  WF.ITEI6.410) 

410  FORMAT  <»0N0  ERRORS  INSERTED’) 

IF(ERRMCD.IQ.MM)  WRIT£(6.140)  (ERFCRSd  ),  1=  l.EF  PLIM) 

IF< EPRMCO.EQ.TT)  WRITEI6.420)  ERRLIM 
420  FORMAT C 12,*  ERRORS  OBTAINED  F?OM  CFRCP  TAPE*) 
L********************  BEGIN  PROGRAM  *********************************** 

INITIALIZE 

T  C  DEL=  0 
TCDATA=0 
ERkPNT=  1 
ERRCNT=0 
INLNCT=0 

ERPCFF=EaH4SE* 1 024 

cdel:t=32 

PTELP= 1 

CDELP=32* I 

CON  S  EC=  1 

I  N  R  E  F  =  1 

I NCOO=2 

OT "cF= 1 

OTC  C0=  2 

WHITE=. FALSE. 

KCNT=1 

DO  S00  1=1.240 
STFEUF ( I ) =0 
COdUrl  I  1  =  0 
800  CONTINUE 

DO  £50  1=1.60 
OT  2UF  (  I  ,  TR  EF  1  =  0 
CTULE { I .0Tr0D)=0 
aEL  5UF {  I .  IN  REE ) =0 
PELOUF ( I ,  TNCP<=  1  =  0 
£50  CONTINUE 

SEARCh=.TRUE. 

SYNC  =  «  F AL SE. 

W<7  TT5=. FALSE. 

<6/02/30  ADDED  FOLLOWING  STATEMENT> 

FILFND  =  .FALSE. 

SEARCH  MODE!  LC  OK  FOR  EOL1  BIT-BY-BIT 
900  CONTINUE 

CAU  GETL  Et  13  .Mr  DE,  Lb  ITS,  L) 

GO  TO  ( ci  o,  530. °30 , 920  1  .MODE 
ST’3  900 
910  CONT’NUF 

ECL  NOT  FUUND;  ADVANCE  P^INTCR  AND  TRY  A  G®  I N 

cdelj=;del°+i 

GC  T  ^  -  0  0 

920  CONTINUE 
STOP  920 
930  CONTINUE 

EOL  c  C  JN  0 


S'* -Ch=.F  a  L SE. 

C  P  S  L  3=  C  DEL P  AL 

IF (  aRITC)  GC  T 0  935 

WRI T  E= . TRUC . 

GO  TO  36  0 
<"35  CONTINUE 


SET  OUTPUT  D'"CPo,10  LINE  TO  0  AND  W'MTE  OUT 
DC  f  50  ’=1,60 

CTBLF ( I ,CTCCD1=0 
950  CUNT  IN Uc 

WRITE!?)  CT  LNN-  ,  vi*  x,  TI3UF  (I  .CTCCD)  .’  =  1 ,60) 
UTl.  NN C  =  L N NO  2F 
R  60  CP  NT  I NUE 

I  F  <  MOLIF-p  )  9  65  «  10DO,  500 
r  65  ST.1C  5  65 
1000  CONTINUE 


t <NC L '  SS  IF  IED 


000015S0 
00001570 
00001590 
00001590 
000  01 60  C 
0000161 C 
00001620 
00001 530 
00001  6*0 
000  01 65  C 
0  00  01  6  5  C 
00001  67q 
00001630 
00001  fc?C 
00001  70d 
00001710  i 
00001720  1 

00001730  | 

00001740 
00  001750 
000  01  A60;  j 
00001770 


000017=0 

000017^0 

00001 eoo 
ooooi  ei  o 
00001620 
00001 =30 
00001940 

ooooieso 
00001 £60 
00001  £70 

ooooieso 
ooo  oi e?o 

00001500 
000  01  51  0 
000  0! 920 
00001 530 
00001  04  o 
00001r50 
00001 560 
00001570 
00001F90 
00001931 
00001992 
00001  9  ?  3 
00001  ”0 
000  02000 
0000201 0 
000  02020 
00007030 
00002040 
000  070F0 
00002060 
00007070 
000020=0 
00002050 
000  071 00 
000021 1 0 
0  00  02 120 
000  021  30 
000  021  AD 
0  0  0  0  7  1  5  C 

oooo.:i‘0 

000071 70 
000  02 1  9 0 
000  0=1  50 
000  J770C 
000  022  1 0 
000  0772  0 
0  0  0  0  2  7  3  0 
00007=40 ■ 
000  0725C 
000  07750 

0000=770 

oooo.'7°  o 
000077=0 
00007300 
ODD  07  31  0 
000  07  3? C 
ooo===3: 
COO  i\  340) 


poo  n  n  p  p  n  nooo  onpo  ri  n  o  o  o  o  o  o  o  r  p  r, 


■JNCLi  SS  IFIED 


3 

"N,r  -D  IMF”  SICN.'L  DECODE  IF  *  COMPLETE  L I  Nr 

000  023EO 
000  0236 0 

r 

irst.jEt  cutout  ijffed  to  hh:te 

000  033~r0 

( 

only  JL«CK  CUN  -  «iLL  Gl  I  f .  3Ff  TED  > 

000023=0 

DC  1313  1=1.60 

00002390 

00002400 

:t.-ji,c  (  i  .c  tcod  >  -  o 

000  0241 0 

1  C  1  0 

CCNT INUF 

00002420 

IN  DE  X=  3 

000  02430 
00002440 

CGLC  R  =  1 

00302450 

2TELD= 1 

0  00  324  5  0 

102  3 

CONTINUE 

0  00  02  4  ■”3 
0  00  02  4?  0, 

CALL  CNE  =  N  3( INDEX , CC  LCK, ST«  TUS.L  ) 

0  0  0  02  4  9  0 

GD  T?  (1030 .1070.1070.1035.1040) .STATUS 

000  02500) 

1  2  3  4  5 

0000251  O' 

STEP  1000 

0  00  02  5?  0j 

000  02 E 3  O' 

= 

UN  /.DDE'';  CHrCK  length  of  output  line’ 

00002540' 

103  3 

COM  I  NUE 

0  0  0  02  55  O’1 
000  0255  0' 

CNE=.TFU". 

00002570. 

:f<DTELP-1-deLHAX )  1031. 1032. 1050 

000025=0 

103  1 

Cr  . .  I  I N  JE 

000  025=  0 

I F ( CHCC  L ) cr  L3F=  XCO( CCLOK  +  2. 2 )  +  1 

00002600 

I NDE  X=  3 

0000261 0 

GC  TC  1020 

00002620 

303  0 

CONTI  •>  UE 

00002630 

’CtiFCry  TV.C-D  T.4ENST  cnal  decode 

00002640 
000  02650 

c 

,‘3ST.5rT  ruTFUT  dJ^FEE  TO  WHITE 

000  0255  0 
00002670 
000026=0 

( 

ONLY  CLACK  C  UN 5  WILL  dE  INSERTED) 

C0002690 

DC  1010  1=1.60 

00002700 
00002 7! 0 

r  T  E  U  F  (  1  .CTC-D  )=  0 

00002720 

301  3 

CENT INUE 

00002730 

I N  D  E  X  =  3 

00002740 

00002750 

COL  C'_  =  1 

00002760 

OTEL°=  2 

03002770 

3023 

CIMI  SUE 

0  0  0  0?  "’3  0 
000027=0 

CALL  Twp-ENG  (!*•  DEX.CC  LL‘l  .STATUS. L) 

00002EDO 

GC  TC  t 3030  .1  070,1 070 . 1 035.  1043 )  .STATUS 

00002=1 C 

12  3  4  5 

COO  02?  20 

STEP  300? 

0  00  02  8  3  0 

un  added;  lcck  ror  next  run 

00  0 0234  C 
<3  00  02  55  0. 

3033 

CONTINUE 

00002B60 

0000257C 

JNE=. FALSE. 

00002=30 

if(.:tel=>-i-felyax  )  30 3i.  1032,  nso 

00002PGC 

303  1 

CONT IN JE 

000  02?  OC 

I F ( CHCOL ) C0LPr  =  MC  D( CDLOF  +  2. 2  )  +  l 

0  00  02° 1 C 

) NDE  X  =  3 

0 J00292C 

GO  TC  3020 

00002=30 

LIME  LENGTHrOELMfX;  CHECK  F  OF.  FILL  AND  LCQK  FCR  E  CL 

000  0294  C 
000  0295C 
00002960 

10  3? 

CONTINUE 

000  02 9 7 C 
00002=3: 

ZEFC=-1 

000  02990 

1  03  3 

CE’JTINUE 

00002000 

ZE  FC=  Z^RC  +  I 

0000301 C 

CALL  GETLE ( 1 .MC Dc .LBITS.L > 

0  00  0  30  2  C 

GC  Tj  (1034 , 1 O^O. 1050, 1050), MCDF 

0000303: 

00003041 

003  0305< 

C 

HFCK  FCR  rilL 

0000=061 

103  a 

CONT INUE 

000  0?07( 
00003030 

CDEL==CDELP+L 

0000^0= : 

C  30  0  3 1  0  ( 

IF (L JITS.E3 .0 )  G"  TE  1033 

000  031  1  ( 

IF  (  ZEFC.LE.  10  )  GC  TO  1070 

00003121 

E2L  FCliN"<;  CH  CC  K  TYPE 

000031  31 
000031  4  < 

CALL  GETLEI  1 ,MF  DE.LBITS.L  ) 

0000315 
COO  03  16 

c-q 


L 


UNCL'  SSIFTED 


n  --i r. <~i  r>  n  r\  non  non  non  o  n  n  o  n  n  r>  o  n  n 


JNC  L 


I F  I  E  0 


I F ( LR IT  S . F  3 .1  )  M=  DE  =  2 

if  (us!  T5.  F'i.o  >  M:r>;  =3 

GC  TC  (  1 0  70 . 1  Of  0. 1 IbO,  1 03 3) . MCDE 
prcyjTjr;  Ft  L  OFTECTED 


EOL  1  CETECTEO 

1035  CONTINUE 

CDELP=CDEL  =  +L 
SUTl,S:4 

IF <1 T5LP.LE.1 1  CONS  EC  =  CGN  SEC  *■  1 
I F (CUN SEC- 2  >1090.  1000.2000 

ECL2  DETECT  EH 

1040  CONTINUE 

CDELF=CDELP*L 
STATE  S=  5 

GO  TO  1030 

P R ORL EM S. PROBLEMS 

1050  STOP  1050 

LINE  LENGTH  CTTC T,  EOL  DETECTED  PREPERLYi  WRITE  OUTPUT  LINE 


00003170 
000031 °  0  ‘ 

000  031 ? 0 
00003200 
0000321 0 
00002220  ; 
000  03230 
000032*0  ' 

00003250 
00003250.  ; 

00003270  1 

00007290 
00  0  03 2  ?  0  i 
00003300 
0000331 0 
000  0332  0 
00003330 
000033*0i 
00003350 
00007360  ! 

00003370 
00003390  , 

00003? GO 
0000^400  i 
00003410  i 
00003*20  I 
00003*70  i 
00003**0  i 
00003*50  j 


lOoO  CONTINUE 

CJELP=COELD  7-L 

W  ~  I  TE  (2  ICTLNN’C  .PEL MAX  .  (  C TH'JFl  I  .  CTC  CD  )  .1=1.60) 
OTLNN3  =  LK1N'  =  0F 
CON  S  EC= 1 

IF  <  CNE )  SYNC  =  . TTUE. 

T  EM  P=2  TREF 
CTF.  EF=CTCCf7 
CT>-C0-TE9F 

I  E  (  MC  D  E  •  E  0.  2  )  Gr'  T  3  10  00 

GC  TC  3000 

LINE  T  23  LONG  CP  N2  9ATCH 

1070  CONTINUE 

WR :te=. FALSE. 

LINE  5  HC  R  T 

1090  CONTINUE 

if  ( ,n: t . syn c )  g:  re  io*o 

rtf  ITF  LAST  G'n  L  INF 

WRITE!  2)  CTLN"  ,  PELM.G  X,  ( PTDUF  (  I  .  ~T1  EF  )  ,!=1 .60) 
SYNC  =. FALSE  . 

GF.  TC  1110 
10S0  CONTINUE 

rti  ITC  1  WHl  TE  ITT 

DC  1100  1=1.  60 
1100  (  T  L-uF  (  !  .  3  TC~D  I  =  0 

w  R  I  T~  (2  )  FTLNN.  ,  =  E'_  M A X  .  (  CTO  Uf  (  T  .  ETC  2D  )  .  ’  =  1 . 60  ) 

lilo  r  tlnn.,=lnn7pf 

IF  <  ST  i  T  US  G.4  )  O'-  TC  1000 

SE ’ GCH= . Tt JE. 

GC  T  3  6  0  0 

END  Ll  MESSAGE 


000  03*60 
00003*70 
000  03*=  0 
000  034G  0 
00007500 
0000351 0 
000035=0 
0  00  03  f  7 0 
000035*0 
000  03550 
000  07560 
00007570 
0  C  0  0  5  9  0 
000  075=0 
00007600 
000  0261  0 
0000=620 
00003630 
000  076*0 
000  03650 
000  C  3f 60 
000  0  =  67  0 
000  0265 0 
000036=0 
000  07700 
000  03  =  1  0 
000  07  =  2  0 
00003770 
000037*0 
0  TO  7  37  5  0 
0  U 0 0  7  =  60 
COO  077=  0 
00007=90 
0000=7: - 
0  0  0  0  =  -'.'  7 
000  0=  «1  0 
0000=572 
0  0  0  0  7  k'-  ’  3 
0070=5*0 
0  0  0  .1  ?  °  5  0 
00007760 


2  00  )  C 

» 

2  J  1  J  F 


T  IN  Jc 

TE (6,2010) 
•t  A  T  (  ’OEND  . 


SEC 

* c  s  * 


DETECTED  (  *  .  I. 


FC  L  *  •  S  )  •  ) 


00  0  75  9 
0  0  0  7  3  5 
0700=° 
COO  <7=  3 


=  0 
c  0 
r  rr 

00 


r.  «£•“>:■ 

T  MvriCSfl 

■=m  F-*  CT-:. 

Eb.F.C  '•<  S-')S!T*V!=Y  FACTOR,  9  IT  fRRCR  RAT 

OOP  .V-  1  0 

0  (vur^  ?  0 

r  ^ 

7  '  T  E  =  F  L  7 '  T  (  c_ 

F-'T  )  /FLO' 

T  (  TC  ’'EL  ) 

00  0  0"»c  30 

ITr!  ■>,  ?07  0) 

Tr.  =  T  ,  TT-*  T 

A  ,  5TF7  I  T  ,  j  m>  CT  ,FRR  ATT 

C  0  0  0  . 5  =  40 

ore 

AM.  T  (  .  j  T=  tcl 

NJ'-'r:E  JF 

v‘COt.7  r'TC  =  ',!»/ 

0  00  X'c^0 

* 

'  7  7  ~  T  •  L 

Mil  t  3  Cr  7 F 

C : ’=  t  D  DAT'  ilTTS  =  *.!?/ 

0  ?  0  0  ?  r  {'  0 

♦ 

•  0  T  =  T  AL 

N’JDlER  CF 

3  —  7  T  M  L,k  r?  =  *.’5/ 

0  0  0  0  -  0 

* 

•C  T*  T • l 

•,J-'=Fr  -F 

I-  JUT  L’NrS  P’=0  7ESSFD  =  '.IP/ 

0  0  0  0  -  F  0 

c-*r 


UNCL4SS 


!r  T  ED 


UNCL'  S  S  IF  I  E  0 


*  '0-'JT  “Kf;  pnr  -  a«Gi4«6) 

CM  L  ST/  T  F  (  STM  I  I  V  L  N  C  T  .  0  I  L  G  ) 

C  r  l-ar'T  (sSL,Jt  XJMUAT!  :  ML  I.CT)/FL7  AT  (  TCDFL  ) 

C  F  T  <  El  M  ‘  X  )  *f  LJf  T  (  I  MLNC  T ) /EL C A T < TCD AT  A  ) 

cf’.crs 

,3  0  H  -  T  (•  PC  *'M=C  t.  SSI  CM  FACTOR  FM-  G3  m»CHIkic  (  CF3  )  =',F3.»/ 

*  'OC- WSSIOK  FACTCi  FPD  G4  MACHINE  <CF4  )  =  a,F8.4) 


<S/0  2/ aG 


>PPFP  MASSING  parameter  tc  errmes  Ct  ll— o  I A  G> 


CALL  EFM  MFS  (PEL  «JF,  i  TfWc  .  RELM/  <  ,  VRC  S.  crnrvT  ,  D1  A  O 
S  T  C  r 

F  N  P 

SJAPSJT  I>.>:  G^T  L  c(  Ll,  I  TS  .MODE  .  WP1  .L  ) 

IMPLICIT  INTEGER! »-Z) 

;,-«******  UFLir  CFMV.CN  /G323IT/  ******* 

( 

C  L  VV[  /J3C  p:  T/v-*S<C  32  )  »F  'M  .SKt  32) ,Ll PI T ( 32  )  .LZ  E  I  T(  32  > 

IN  T  E  CM-  v  ASK.  C.  M-*.  S<  .  LI  HI  T  ,LZB  I  T 

C 

C  C  MV  :  N/r-  jfr  L  L  ;jJP  (  6  0,0  ,  CD?  UF  (  2A0  )  .  r  T2UF  (60,2  )  . 

*  STrRJF( 240),  STAT(3000> 

C  C  wmCN/HL'Ff  /C'  DE(  3  .  F’2  ,  O  ,  COE  ^(3,11  ) 

CC"  (CV-'K/y  /EFC-S  S{  1  0000  ) 

C  X  ******************  *  *  Lf  BELLED  COMMON  V/O'DLES  ************  *  *  **  ***  *  *  * 

t 

c  C  4  -ICN/I  V  AF  /hrlmaX  ,  V.'.ES  .  E=  MASE.  CM  CM  AX,  EKFMCD.LI  NMAX  ,K 
COM-N/;  vat/  tk,  nm-x,  ;  ILMVC  •  p  T  U  L  *  <  I  Nf  L  D  ,  r?ELP,0TFL3,  C0ELW, 

*  COFLCT,  INELCT  .  TCD  AT  A  .  TCD^L  .EPFFNT  ,F  FFCFF,  Er  |*LIM  , 

*  <*r  '  FNT  ,  I  NLNCT  «  C  CT;  SEC  ,  CNFFnit  ,  L  NN  DBF  ,  KC  NT  , 

*  INF'  T , 1 NKlF , CTCCD, ~ TREP . STFBIT 
CC  •)  M  K  /  »C  HAP  /  DO,  T  r  ,  MM  ,  TT  ,  NN,  V  Y 

CO  •*k'CN/l.  MCI  C/fM-AA  r-l  ,  DI  «G,  SYNC.  ,  WFIT'T  ,  ZEF"  ,LEFT,C  FCFL  .PNE  .WHT  TE. 

AF IlENP 

L  C  G  I  C  A  L  EE*  rCH,  DI  G  .  SY"C  ,  W'  IT  E  .  ZET  fFT  ,  FHCOL  .  CMP.  WHITE.  FI  LEM? 

C ******** x **************** ***  BEGIN  PROGRAM  *************************** 

C 

M  r,  rx  ~  -4 

c 

C  “.FTkTLvE  NEXT  PIT  Fr.wM  C08UF 
C 

100  CENT INUE 

c 

C  ENCCDF  *  Nrvx  L I  N r  I  F  NECESSARY 
C 

TS+C0ELn-  l.LE.CDELCT)  GC  T^  200 
IF  (  COELCI  -r  DEL  ~ +1  )  170,  190,  U0 

1TJ  5  T  ■■ ■  17  0 

13  0  CC  N  T  IN  JF 

STFr'  jr-  (  I  )rU4(  STP  ;)J  F  •  C  i)EL  D,  CP2LCT  -C  DEL  P* 1  ) 
lp  0  COT  tNJF 

C  D  jr  1.  P=32-  (C  Prl.  CT-CDCL3  ) 

Call  e nc d f 
200  CONTINUE 

KR  D  ---  I  4  3  (  ?  rr  EOF  ,  C  D  E  L  P  .  L  d  I  T  S  ) 

L  ~  L  'ITS 

IHL.LT.13)  GP  TE  2  SO 

IF f  L  .EG.  1  3. AND.wGD. CQ.CCPCPDI  3.  1 0)  )  GE  TC  300 
IF  (  L  .H.l  3.  AND. WCD.  EQ.  CnpE'Pl  3,  11  )  )  GF  TO  400 
2S0  CCMIN-JC 
M  cor  -  1 

r-F  L  IN 

300  CC  ’  1  T  1NUF 
MC  JF  -  2 
r-  E  T  L  G  N 
4  0  0  C0KTINO*- 
M  C  J  r  =  3 
F:E  T  L  F  N 
END 

SLHSCUTTNF  FNCDE 

c 

IMPLICIT  INTEGER! A-Z ) 

c 

c*******  LAprtFD  CPM’-VN  /G32.)IT/  ******* 

c 

CF  4*0' i  /G32PI  T/V1  3K  (  32  )  .COM  -SK(3'’),LIQIT(32)  ,LZ  E  IT! 32  ) 

I MT  r 5fF  MASK, Cr  MASK.Ll TIT .LZSIT 
C 

CPM  a  -  J/njFF/TfLPJF  (  6  0. 3  )  *  CDriUF  (  240)  ,  °  T  T3UF  !  6  0 . 2  )  . 


000  03 
00004 
0  00  04 
000  04 
F03  OA 
000  04 
000  34 
0  00  04 
000  0  4 
0  00  04 
00004 
0  0  0  0  4 
COO  04 
0  0  0  0  A 
909  04 

ooo  04 

ij  9  9  9  4 
r>  o  o  04 
0  0  0  04 
0  0''  04 
0  0  C  0  4 

000  34 
0  0  0  0  4 
0  00  04 
0  00  04 

0  oo  oa 

000  04 
000  04 
00  0  04 
0  00  04 
0  0  0  04 
000  04 
COO  34 
000  04 
000  04 
0O0  04 

00004 
000  04 
000  04 
000  04 
COO  04 
9  00  04 
00  3  04 
000  04 
000  OA 
00  0  0* 
GOOD* 
0  0  0  04 
000  0* 
0  00  04 
000  0* 
000  FA 
00  0  04 

oooo* 
000  0* 
000  04 
0  00  04 
000  04 
000  04 
000  04 
000  04 
0  00  04 
0  0  0  0  4 
000  04 
00004 
000  04 
000  04 
000  04 
000  0< 
0  00  0' 
000  0' 
oooo; 
000  0' 
0000' 
0000' 
000  0 
0000 
000  0 
000  0 
000  0 
0  0  0  0 
oooo 


UNCL-'  S3  I F  I  f  rx 


nni  n  A  «  ri^n  nr'-,  n  non  n  r>nn  (~,nn  n<^or><~>  doan  or 


UNCLA  S  S  IFIED 


*  STF3'JF<  240  )  .  ST  i-  T  (  3000) 

CrMMCN/HJPP  /r^OEt  3,02.2)  .  CODER'*  (  =  ,  1  1  > 

CO  -5-XN/EF  AY/EP  rc-  5  <  1  0000  ) 

*******************?-***  FILE  DEFINITION'S  ******************** 

CrMMCN/FILES/TFFM,LPF!L.PCLF!  L.  CTFIL.  FOFIL 

*********************  LS  riELLED  CCKMDN  VARIABLES  ********************** 

C'D;I  CM/1VF  /OELIV  X  ,  VRE  0  ,  E  PH  A  S5  .  C  MPV  A  X  ,  E  PR  Mr  D  ,  LI  NMAX.K 
CO  -IMCN/oy  A? /I  NLNND  .  DTLNNC  .CTEL*  .  I NE  LP  ,  CDEL9  .  OTFLP.CDEL*  . 

*  For  lT  T  ,  ir'ELCT  «  TCD  “-.T  A  ,  T  C  Rc  l  ,  EtlPON'T  .EKPDFF,  Er  PL  I**  , 

*  FF^C'IT,  IMU1CT  ,  CC'N  SEC  ,  CMFC  K'T  ,  LNN  OBF  ,  KCNT  , 

*  I  NC  OD  .  I  Nr.  EF  ,  CTCOD, OTREF ,  STFSIT 
CC  M  -1C N/  ICK*  o/DD  .  !  T  ,  MM,  TT,  NN  ,  YY 

C  OHVCN/L  OG1  C/SE<*;  CM  ,  DI..G,  SYNC  ,  *RTTE  .  ZE  RD  .  LE  FT  .  F  FCOL  .  C  NE  ,  *  HI  TE, 
afilend 

LOGICAL  SEARCH,  OT  AG.SYIJC.  Wf  ITE.ZE"",  LEFT  ,  CHCOL.  CNE.  WHITE,  FI  LEND 
4  *************  *****************  **  PEG’N  PROGRAM  ******************** 

INITIALIZE  V)  -  I  )  F  LE  S 

KC  NT=KCNT-1 
CDELCT=32 
CDD- T4=0 
02  EO  1=2,240 
CDFUF (  I  )  =  0 
STF  JUF (  I  ) =0 
50  CONTINUE 

READ  IN’UT  FICTU'E  FILE 


100  CONTINUE 

<6/02/30  ADOEO  FOLLOWING  ST  AT  EMEN  T> 

IF(FILENO)  GO  T-i  120 

RE  •>  0  (  1  .  Ev  0=  12D,rFR=50  0) 

*  :  NLNNC  ,  T  N=LCT,  <  °El  3JF(  r  ,  INCCO)  .  1  =  1  ,F0  ) 
IF  ( 'ODC  IN.L*',N"-1  .  V  =  ES)  .  "E.  0)  G?  T"*  100 
if  (  inelct.lt. pfl"*.x  )  call  exit 
INLNCTsJ  N'LNCT*  1 

LOAD  f.JTPJT  LINE  N.IM3  Er  TjrFER 

L N N ■“  3  =  r  JNLNNO 

IF  (  SEAR  CM  )  C  TLNN  0=  LN  NO  r)F 

IF<  TNLNNF.LE.L  IN"  AX  )  G  TC  140 

WRITE  SIX  ECL  1  *S 

120  CN'^INOE 

<<S/C2/«0  ADDED  f:  LL  •wing  ST  :.TFM=*  T> 

F I L  F  N D  =  .T'UC. 

DO  1  3D  1=1.6 

f  i-  LL  LCDcNj  (1  C,  0.0, 0,0, CD  ELL  T  .ODD  AT*  ) 
130  CENT  INJr 

n0  135  7  =  1  .  f 
STF1-  jF  (  I  )  =0  D?  Ur  (  I  ) 

1  3  t  CuST IMUE 
00  To  400 

F  7  '  ST  '  ~  K  l."F5’ 

14)  C  C  *-  T  I  N  ) r 


IF  (■•’".(  1‘IL  '  OT-1  ,k  )  ,NE.  0)  GC  V.  MO 
)f  E-D5  MR-JS’f'AL  CEDING 
v  r  •  I  TO  ON"  ti  CL  1 

CALL.  CCD'-NC  (  1  O  .  U  .  0  ,  C  ,  0  ,  CD  EL  L  T  ,  ~  DD  '  T  *  ) 
FCL  !5  =  1 

TS  ST  0  DL  ‘  OF  Ft  3*  ;.LF  1EN~ 


00006==  0 
00004700 
00004900 
000  04  M 0 
000  OA  8 ?  D 
00004=30 
0  00  04  e  4  0 
00004P50 
000  04950 
00004270 
000  04  9  4  0 
000048?  0 
00004^00 
000  049 1 0 
000  0492  0 
00004?  30 
000  0493 1 
00 J04940 
000  04950 
OOEOA9SO 
00004970 
00004590 
000  04  c:  0 
000  05000 
0000501 0 
000  0502  0 
0  0  0  Oc  0  3  0 
00005040 
000  05  0  4 1 
00005052 
000050=0 
000  0507  0 
0000r 040 
0000 50=0 
000  05 0  ?  1 
00005092 
0  00  OF  0  5  3 
000  0 For  4 
000  050  c  r 
000051 00 
000  0= 1 1  0 
roooci2o 

O00  051  32 
00005140 
00005150 

000  or»i  r  0 

0 00 05170 
000  0Ri  52 
000051 ?0 

r 00  oc20  0 
ooo con  r 

000  0E?°  0 
OOOOf  2  3<= 
COO  0524  0 
00005250 
000  05251 

000  05?5? 
0000525? 
000  05  =  5  4 

000  05  =  55 

00005250 
0  00  052 ’0 
000  O1- 2"  0 
000  05  =  ?  ? 
0  00  05300 
000053! = 
00005322 
0  0  C  0  F  3  2  ! 

0  f)fi  0C  3  2  - 

0  00  053  3  0 
00005740 
0000535? 
000  0=  35  1 
0  00  D5f-  3  0 
0000354 0 
0  0  0  0=550 
00005552 
2)0  05 5  ? ? 
0000=5=? 
0  0  0  0  5 1  -  0 
0?0  0  -f  J  ? 
0  00  E7  1  ' 


JNCL  GS  TRIED 

C'l 


UNCL1  5S  IFIED 


I  F  (  *  401  PFL^UP  (  1  ,  I  NO  DO  )  ,  1  .  1)  .£0.0  )  C.C  TO  150 

0  00  0572  0 

COO Qc 7  ?  0 

(. 

F 

:~st  ar  iCM  «lack:  encode  o-le-'GTh  whtte  <;jn 

000  0rT40 

k. 

OOOOf ••’60 

CALL  CIDFlN  (0 ,  1  , CDELCT ,COO/  T7  .CCDE ) 

00005750 

'>CL«'  =  3 

000067=0 

i" 

00005760 

(. 

C 

-lcjlatf  run  length  and  encode 

0  00 067  =  0 

0000^600 

1  5  0 

CONT  INUE 

000  05? 1 0 

=  UN  =  0 

000  0552  0 

DC-  20  3  I-l.OELMAX 

00005630 

?tL=l40(AF. PJF(  l.INCCDl.I.lJ+l 

o  c-o  oc.eA  o 

IF  <  CEL  .EG.^OLAF  )  GO  TO  180 

0  00  0565  0. 

Call  ccdclnigu*  ,="l;f .cdelct, cddata .code ) 

foo  ospca 

IF  (.NOT. JIAG)  GC  T1  170 

000  05  D 7  0! 

WR  I  T  =  (  6,  1  60  )  FUN  .  p;  L.'.C  .cdelct  .cfoi  t  a 

00005660 

16.) 

FO  R  A  A  T  (  4  7  3  ) 

0  00  055  7  o1 

17.) 

CONT  INUE 

0  0  0  05  5  0  0 

~UN  =  1 

000  J  o 

POLAF  =  !.'CO  (~CL  A"  +?  ,  2  )  +1 

000  0562  0 

Gn  TC  200 

00005630 

1  ?  7 

CENT lNUr 

000  05?  AC 

F  U  N  =  9  UN  7  3 

000  05? 6 C 

20  ) 

CC.NT  INUE 

000 05? 50 

CALL  CLP5LN  (DUN  ,PrL  AT'  ,  CDELCT  ■  CDD  AT  A  •  CODE  ) 

0000FC7C 

IF ( .NO T. D I » G)  GO  TC  210 

000  05—C 

■A  A  I  TE  (6,  J  60  )  FUN,  POL  -  7,  CDELCT  ,  C  DDATA 

0000^030 

GC  TO  210 

000  06  01  C 

c 

000  0602  0 

r 

t*d-d:  riEf-'s:  cnal  coding 

0  00  06 0 3  C 

C 

000  0604  C 

CONT  INUE 

00006050 

FTFE I T  = ST  FR TT  +  1 

00006050 

c 

O00D60=C 

c 

w 

FIT--  ONE  E  CL  2 

000  0500  C 

c 

00 0  06  0°0 

CALL  CL DENG ( 1  1 ,  0, 0.  0. 0 . CD EL C T , C DPA T A ) 

00006 1 00 

c 

000  0<=  1  1  0 

f ' 

31 

ET  AO  TO  LEFT  EDGE-1  770  P  0L7  f  I  TY=WHT  TE 

000  Of  1 20 

c 

COO  061 30 

A  0  =  0 

00006 140 

P  :  1  =  0 

000061 50 

L EFT= .TRUE. 

000  06  1  60 

L 

00306170 

c 

j£ TEC  T  A  1 

OOOOf  1 60 

c 

000061 ?0 

62  0 

C  CN  T  I  N  JE 

003  06200 

I=A  0  +1 

0000621 0 

IF  (  I  .GT.REL  M».x  )  G r  TC  640 

000  06220 

63  7 

C  f 1  T INUE 

00006230 

PEL  =  I 4  °(REL  PUF(  1  ,  INC CD  )  ♦  1,1  ) 

000  06.24  0 

IF < =EL.NE.RnL )  GF  TC  640 

00006250 

1=  !  +  1 

00006250 

IF(  !  .LE.P  El  MAX)  GC  TO  630 

00006270 

640 

CENT INUE 

0 00  06  2  5  0 

A  1  =  I 

00006=90 

r 

00006300 

c 

•DEFECT  51 

000  06  31  0 

c 

000  0632  0 

l  =  A  0+  I 

000  06330 

IF <  I ,GT .PEL  VAX )  GC  TL  665 

000  0634  0 

I  (LEFT)  GC  TO  646 

000  06  34  5 

PFl.N  1=  I  43(=  EL  BuF(  1  ,  INREE  )  ,A0 , 1  ) 

000  06350 

GC  TG  660 

00006355 

645 

PELM  1  =  0 

000  06360 

66  0 

CONTINUE 

000  06  370 

PEL= I 4P( =cL DUF{ 1 . INF  EF ) . I .1  ) 

000  06  3  5  C 

IF  (  PEL  .NF.R  ELM1  )  GC  TC  670 

000  06  3  ?  C 

660 

CONTINUE 

000  064  0  C 

PEL«  1  =  REL 

000  06  4  1  C 

T=  I  *1 

000  0642  C 

IF<  I  .LE.PFL  da  X  )  GC  T'l  650 

0  00  06-4  3  C 

665 

CO/.  T  INUE 

000  01-440 

B1  =  I 

000  0645  C 

GC  TC  7io 

00006450 

670 

CONT INUC 

000  0r4T0 

IF  (PEL.  NE  . c  CL  )  GC  TC  61'0 

000  0645  0 

GO  TO  660 

000  064  ?  0 

6  c  0 

CONTINUE 

00006500 

S  1=  I 

0  0  0  0  6- c  1  0 

FCL=FEL 

0000652  0 

C.-V 


L'MCL-  SS  IP  TED 


r,  d  n  r,  n  rifln  n  nn  n  r>  d  r,  n  o  d  r>  Don 


UNCL4SS  IF IED 


DETECT  82 
1=01*1 

IF  (  I  .GT.PF_  MAX  )  G7  Tr'  "» 1  0 
700  CONTINUE 

PEL= I4B< P£L«UF(  1 , I  NT EF  1.1,1) 

IF ( FEL.NE .PCL  )  GC  TC  720 
1  =  1*1 

IF  <  I  .LE.PEl.  MAX  1  GC  TC  700 
71  0  CCNT IN JE 
02=1 

GO  TC  730 
720  CONTINUE 

3  2=1 
P0L=FEL 

730  CCNTINJE 

IF<  «NDT  «L  Ec  T )  POL  A 3= I4  3( PELBUFC  1  , INCOO ).  A  0,  1  1  +  1 

IF ( .NOT. LEFT)  GO  TO  7 40  _ 

pni_  £  i 

AO  =  1 

left=. false. 

74 J  CONTINUE 

TFST  FOR  PASS  MODE 

IF(E2.GE./1)  GO  TO  750 

PASS  MODE  COOING  (CAN'T  END  A  LINE  !N  PASS  MCDE5NEW  »0  MUST  H»VE 

SAME  P'.JL/  CITY  AS  B2  ) 

CALL  CCDENG (1 .0,0,0 «0,COELCT, CODATA ) 

A  0=3  2 
GC  TO  620 
750  CONTINUE 

MAF  =  I »RS( ’ 1 -Bl) 

I  F ( M A3—  3 )  975.836,790 

CTDE  BY  HDR12CNT/.L  M?  DE  !  F  I  c  ST  DETFCT  A2 

79-7  CONTINUE 
I=f  1*1 

I  F  (  I  .GT  .PEL  MAX  )  GO  TC.  610 
CALCULATE  polar  tty  of  Al 

PC L=  1 4  7( PE_  BUF<  1,  IN CCD  )  ./  1  ,  1  ) 

800  continue 

PE L=  I4r  <  PEu  °UF(  1  .  TNCi:  D  ),  1  .1  ) 

Ic  (  PEL  .NE.PEL  )  GO  T °  320 

1  =  1+1 

IF (  I .LE .PEL  Mi  X )  GO  T?  300 
8 10  A  2  =  c EL  m  AX  + 1 
GC  TO  370 
320  CONTINUE 
A  2  =  1 

830  CONTINUE 

CALL  CCDENG  (2  ,  P  D  L  A  9  ,  40, Al  . 6 2 . CDF LCT , COD • T  » ) 

4  0=42 
GC  TG  9  60 

:tde  ey  vertical  modi 

873  CONTINUE 

IF(Al-Bl)  8.50,  “40, 840 

84  o  C-.LL  CFDENG  (/  1-31  *3 . 0, 0.0 , 0,  CDFLCT,  COOATA  ) 

GC  TC  r  SO 
850  CONTINUE 

C  4LL  C  ' D^NG  (B I- A  1 *6 , 0 . 0, U , 0 . CDFLCT.CDD  4TA 1 
<•5  0  CON+TNJE 
f  0-t  1 

TEST  E  CG  CD  T  L  INC 
9oO  CCNT’NJ" 

I  F  (  0  .  T  .  P  ‘  L  M  •  X  )  G  '  -  '  210 

PC  L-  14  "(PEL  PU,1-  (  1  .  TNCE  P  )  ,  AO.  1  ) 

GO  T  3  -.2  0 
2 10  CCf  T  IN JE 
C 


00006530 
000  06540 
00006550 
00006560 
00006570 
00006530 
00006590 
00006500 
0000661 0 
00006620 
000  06630 
000  0664  0 
00006650^ 
00006660! 
000  0667  0 ' 
00006630. 
00006690 
00006700  | 
000  067 1  0 | 
000  067?0 ; 
00006730, 
000  0674  0  j 
00006  ■’50 
00006760 
000067^0 
000  06  T  ?  0  , 
00006 700 
00006603 
0000681 0 
00006820 
0000683  0. 
0  00  06  P  4  0 
00006850 

ooooceso 

00006870 
0000*n?ri 
000  06F  TO 
000  0“  900 
00007200 
000  0721 0 
00007270 
0000^230 
0  0  0  07  2  4  0 
0  0  0  O'7?  5  0 
000  OT  26  0 
00007270 
0000"?®0 
0  00  O"7  2  ?  0 
000  0-300 
000  CP? 1 0 
0000"7320 
POO  0” 3? 0 
000  0~34  0 
000  O'*?  5  0 
000  07360 
0000”?7 0 

0  00  0- 3?  0 
00007390 
0000”400 
000  0-4  10 
0000-470 
000  0-4  3  0 
000  0-4  4  0 
000  0- 4  G  o 
0 020-4S0 
000074’D 
000  V4?  0 
0  0  0  O'  4  o 

o ooo-soo 

000  0-51  0 
000  0-52  0 

000  07 63 p 
0  00  0-5  4  0 
0002-550 
0000'560 
00007570 
000  0-5E  0 
0000-570 
00007600 
0  0  o  0  -  <•  1  0 
0  0  0  O 7 •  2  0 
000  O’l.?  0 


JNr  Le  SSIETED 


non  n  non  o  r>  /->  o  ^  n  ^  o  o  a  o  n  o 


c  switch  r:nr  t  ■  fc-'  e'<:r  lines 

< 

TF  Xr=  T  Nf  r  F 
I  N'  FF  =  I  NC  ri 
!  NCI'3  =  T  E  Mr 
C 

C  Or  L  v»  =  (  COEl.  C’  ♦  12-  1  )  /32 
OO  3  00  2  =  3,  CDFl  w 
ST  Ft  UF  (  I  )  =C  mUF  (  I  ) 

300  continue 

SAVE  LINE  Lr''GTH(0<  Ts  SITS  ♦  £DL  ) 

STAKINLNCT  )  -  CO  OAT  4+13 

CHECK  COOED  LINE  LENGTH 

F I LL=CMPM *X  —  (FPELCT— 32) 

IF(FILL)  400,400,250 

C  COE  LINE  TIC  SHJCT;  FILL  IT  T  F  CB»MAX 
250  CONTINUE 

AOCUTULfTE  STATISTICS  AND  Ef'CT  TAOUPT 
400  CCNTINUE 

lF(tfiM:o.cQ,f:Ni  s:  to  390 
EFT.0 "  CORRUPT 
350  CCNTINUF 

EPr  PI  T=  Fr  Err  5  (  EPPPNT)-EFiF."FF-TC.DFL 
IF ( E TFD’T .lE.O )  G3  TC  360 
IF(  FPF.EI  T  .GT  .COELCT-32  )  GO  TE  3  =  0 

E  RFC  T  IN  RANGE  C.F  COOED  LINE?  CHANGE  APPROPRIATE  EIT 

5:T  =  I4tl(STFBJF.EPF3iT  +  32,  1) 

B I  T=vtOO(  3  IT +1  ,2  ) 

CALL  MI  2  8 (BIT ,  S TFP J F , ER Rb IT +3 2 . 1  ) 

ER^CNTsEPACNTF1 

INCREMENT  EEP^p  LIST  PC  INTER 

360  CONTINUE 

E  K  D.  F  N  T  =  ER  Rp  NT  + 1 

IF < ERRPNT .L ^.FEPL I M )  GO  TO  350 
ERRCP  LIST  EXH*USTED 
ERPCNT  =  EF.RP  NT-  1 

v»PI  TH<  6.  3  70  )  FRFfPNT  ,Er  POE  S(  EcrPNT) 

370  FORMAT  (  'OEPRSP  LIST  EXHAUSTED  ATMIO.'TH  ERROR*,*/ 

*  ’  L-*  ST  ERROR  "CCURPED  AT'  ,110.'  BITS*) 

ERKM0P=NN 

Compute  st* ti sti c  s 

390  CONTINUE 

TC  DFl  =  TC  DEL  +CDF  Lr  T- 32 
tcdata=tcdata+codata 

IF (OILS)  X  =  I TE ( 6* 1 60 )  I N  L  NC  T •  CDOATA 

IF  (.NOT. DIAS)  GC  TO  460 
C  D EL  w= ( C DEL ' T ♦ 3 2—  1  )  /3  2 
»RIT£<6,450)  <  CDP’JF  {I  )  ,  I  -  1  ,  CDELW  ) 

XR I T  E ( 6 , 4  SO )  <  STFBUFI J  ) , t=l ,  CDHLW) 

450  FOPM4TI6Z 12  ) 

46  0  CONTIN'JF 
»E  TURN 
C 

50 0  CCNTINUC 
CALL  EXIT 
C 

END 

SJHSCUT INF  CDDFNGI  M ODE , PC LA R , A . P . C , C DELC T , C DO* T A ) 
IMPLICIT  INTEGER(A-Z) 

Co  v  von  /BUFF /PEL  r3JF(  6  0,3)  . CD9UF<  240)  ,RTBUF(50,2)  , 

*  STFBJF(  240  )♦  STAT(TOOO) 

CnMM^N/HUFp /FROEI 3, 92 , 2 ) .CrDCFD  C  3, 1  1  ) 

CGNMCN/ERAY  /FRT'.’RSI  10000) 


000  07f  4  0 
TODCASO 
00007660 
000  076’ 0 
00007640 
000076  =  0 
0  0  0  0’ 7  0  0 
0000771 o 
0000'7?0 
0000773  0 
00007’40 
0000775  0- 
0000775  0^ 
0000777  0' 

000  0"72  o; 

000  OTPO* 
0000720  01 
OOOO’fT  Oi 
0  00  07 6 2  Oi 

oooo’esc1 

0  00  07  6  4  0; 
000  07P50I 
0  00  07? SO' 
000  0’?70 
OOOOTPa  0 
0  00  076  P  0 

onoo’poo 

0  00  O’PI 0 
000  0’c  2  0 
OOCO'CTO 
n000’=40 
0000’?50 
0  00  0’°  S  0 
000  0’  =  7  0 
000  0703  0 
0000’CF  0 
0  00  0?  0 3  0 
OOOOPOl 0 
000  0?  02  0 
0000=030 
000  OF 04  0 
000  0?  0  5  0 

000  o°o so 

000  0?070' 
0000=090 
000  OE  0  =  0 
000  OF  130 
000 0C1 1 o 
000  OE 1 2  0 
0000? I  30 
0000  = 140 
POO  O'1  1  50 
0000=150 
000031 y0 
000081 30 
OOOOF 190 
00005200 
OOOOP21 0 
000  OP220 
0000P230 
000  08240 
00  0  OF 2  5 0 
000  0=250 
OOOOF270 
000  032P0 
OOOOF 2?  0 
000  OF  30  0 
000  OE  31 0 
POO  0P320 
000  0=330 
0 00  0=  3  4  0 
000  0=350 
OO00E350 
POO  OF?  7  0 
000  OF  3?  0 
000  083; 0 
POO  06*0  0 
000 OE  4  i  o 
000  OP*  ?  0 
0D00P430 
0000=440 
000  03450 


C-IO 


UNCLA  ?S  1=  TED 


non  r>  f.n  r.nn  oa'h  nr>o  nn  n  idd  non  icon  non  nno 


UNCLASSIFIED 


C*****************  BFGIN  PP.DGPRM  ********************* 

c 

CALL  MI  2 9 l CCDE=  D(3,  MODE  ) . CD  SUF , CDFL CT *1 ,CODERD{  1. MODE ) ) 
CDELC  T  =  CDEL  CT  *-Cr,DE  A  0  (  1  ,MCOE) 

GC  TO  (  100, 200, 100,  l 00 , 1 00,  1 00.  1 00,  1  OP. 1 00. eOO,  800)  .MODE 
MODE  1  2  34  56?  8C  IQ  11 


STOP  125 

PASS  MDDEd  ). VERTICAL  MODE  :  A1  ri  1  =  0  C  3)  .  A  1  P  1=  1  (  4 , 7  >  ,  *  2  (  S  ,  8  ) .  =  3  (  6 , 9  ) 


100  CONTINUE 

C  D  D  A  T  A  =  C  D  D T *  ACODEKDI  1  ,  MCDE  ) 

RETURN 

HORIZONTAL  MODE! 2) 

200  CONTINUE 

CDOATAsCODA T* +CnDER  D  {  1 .MODE) 

CALL  CGDELN  (R-4 ,=0l AK  ,  CDELC  T,  CD  DAT  A  .CODE) 
NE*PGL=MOO( P0LA0+2, 2  )  •*■  1 

CALL  CGDELN  (C  —  9 , NFtf PCL . C DEL CT , CDD AT A , CODE ) 
Rc  T URN 

ADD  ECL 1  OP  E  CL 2  TC  _INE  (10,11) 


80C  CONTINUE 
RETURN 
END 

SUBROUTINE  rNC!ING  (  I NDEX, C CLC ?  .STATUS.L) 

IMPLICIT  INTEGER!  A- Z) 

*******  LA3ELED  COMMON  /G328I T /  ******* 

C  CMMCN  /G32  ei T/Mf S<  <  32 )  ,COMASK( 32 ) , L I  8  I T ( 32 ) , LZ E  I T <  22 ) 
INTEGER  MASK, CO Mi SK . L 10  I T , LZ6 1 T 


CO  MMON /3UFF /•=  EL  8UF(  6  0,2)  ,  C08UF(  240  )  ,rTBUF(60,2)  . 

*  STFP'JF(  240),  ST  AT  (3000) 

COMMCN/MUFF/C= De( 3,92,2 ) .CODERDt 3.1 1 > 

COMr.<CN/ERAY/HRRD=S(  10000  ) 

FILE  DEFINITIONS  ******************** 


COMM-N/FILES/TFC  M  .LOFrL.PELR-TL.CTF  ■  L.E-FTL 


LABELLED  COMMON 


VARI ABLES  ********************** 


COM  MDU/I  VA= /OELM<  X  , VIE  S , E  °H^.  S  E, CMPM  AX,  E  - R  MO  D  .  L I  AMAX.K 
CO  MMCN/FV A5/I N_NND , C T LNNO . OTELV . I KELP . CDELP . OTF LP , CDEL*  » 

*  COELCT,  XNELCT,TCDATA.TrDEL,EPr‘PNT,ERCDFF,E=RLTM, 

*  EE- CNT,  INLNC T , C  Of  SEC,CMECNT,LNNOBF, KCNT, 

*  INCOD  .  I  N-.EF  ,  CTCDD,  DTCEF  ,  STF«IT 
CD  MMCN/TCH' R/DO,  I  I , MM,  TT.NN.YY 

COMMGN/LCGI  C/ SEARCH,  DI  AG.  SYNC  .  ITE  ,ZE?0,LEFT,C  FCOL  , ONE  ,  * HI  TE, 
AF  ILEND 

LOGICAL  SEARCH, DI*  G.SYNC.Wf  I  T E , ZER 0 , LFFT , CHC CL . CNE . WH I TE , FT  LEND 
3FGIN  0ECCDC  LOOP;  RETRIEVE  NEXT  CODE  WTPD  LENGTH  (L> 

1003  CONTINUE 

1002  LE  45IT=C.CDE  (  1  ,  INDEX  .ClLHS  ) 

CALL  GLTLE( LEN=>IT .MODE, LB  ITS, L  > 

IF(DI'.-,J  W  =  ITF<  6,  1  000  )  LENEIT.MODE.LRITS.L 

1003  FORMAT (21 6, Z3 , 16) 

GC  TO  (1040,1203.1205.11=0),  MODE 
S  TO  P  1  0  4  0 
1040  CONTINUE 

I  F<  L?.  ITS.ED.CCDEt  3,  INDEX, COLOR)  )  GC  TC  1100 
NO  M'.TCH;  ADVANCE  r-Of  rr0  INDEX  VIA  DECODE  THREAD 


I ND C x  =  rCDE( 2,  TNDEX.CULJF  ) 

IF ( INDEX. GE,  =  3  )  30  TC  1190 

IF (CC0E( 1  , INDEX, COLOR ) .cQ.LENO'T  )  GC  TO  104  0 


Cl  Or.  HDRD  ltnc-eq;  FROM  THE  TOP 


GO  T"  1002 


MATCH  r C  UNO 
1100  CONTINUE 


00005460 
0000P470 
0  00  0847 1 
00008490 
OOC  0P490 
00008500 
0000S51 0 
000  06520' 
00006530 
0  0  0  OP  54  0 
000  0"55C: 


000085601 
00008570, 
00008590 
00008600 
0000961  Ol 
00008620! 
000  0863  0! 
ooooP64or 
000  0?650i 
0  0  0  Or  6  7  3  j 
000  0P66  0 
000  066  =  0* 


00006700' 

oooopti  o; 

0000P720 
000  097301 
P00OE740 
00008750 
00006770 
0 00  0 8  T°  0 


000  087=  0 
000  0853  0 
000  0881  0 
00008820 


000  08530 


000  08640 
000  08950 
0000p8f>0 
00008870 
000  08590 
000069=0 


000  05=00 
00008  =  10 
00008  =  20 
00008=30 
000  05940 
000  06950 
000  0=  =  6  0 
000  05CP0 
0  0  0  08  =  90 
000  OP?  =  0 
0000=030 

0000=0: o 
0000=  01  1 
003  0=02  0 
0000=030 
000  3=0*0 
0000=053 
0030=0^0 
0000=073 
000093=0 
0000=0=0 
0000=100 
000  0=  I  1  0 
0000=1 23 
000  0=1  ?  0 
0  00  3?  1  4  3 
0000=1 50 
0000=160 
0000~170 
0  0  0  3  °  1  5  0 
0000= 1 =0 
0003=233 
0000=21 0 
0000=220 
000  3=  22  3 
300  0~24  3 
0  00  3=2  5  3 
000  0=  26C 
0  30  0=2  ’0 
0  0  3  0  ?  2  9  0 


<L-U 


UNCL*SSI=IED 


n='n  nnn  nnn  nnn  oon  n'~n  inn  nrn 


UNCLASSIFIED 


C  0  EL =  =  ''Q'rL=>+L 
NCT  'N  eol 


TEST  LEV-  m*k:  U=>  °  =  T  ET.  -1  IN’/.  TI  MG  CEDE 
^UMEV=  T  NOE  X-  1 

I  F  (  INDEX.  GE  .65  )  D UNLEN=  (  I NDEX-S4 )*64 
IF ( 'UNLEU. EO.O )  GC  TC  1160 
IF (CCLOF. FQ. 1 )  GG  TC  1155 
!  F  (  RUNL  E'i  T.  0  )  STOP  1100 

-DO  SLACK  -  U"-'  TC  CUT=UT  BUFFER 

OQ  1150  !  =  1,F.UNLEN 

CALL  MI2BICCLCR-1 ,DT3JF{  1 .OTCOO) .CTFLP.  1 ) 

CTELP=OTEL- +1 

IP ( TTELD— 1 . GT.cELMaX)  GO  TC  1180 
1150  CONTINUE 

GC  TC  1160 

ADD  WHITE  PUN  TG  OUTPUT  DUFF  EH  CRY  DEFAULT! 

1155  CONTINUE 

CTELF=CT£L3+PUNLEN 

IF  (  CTELP-  1.  GT.PELMA  X)  GC  TO  1130 
cutout  line  less  th*>“  or  ejjvl  tc  max  spectfifd 
1160  C  ONTINUE 

IF(  1NDEX.lt. 65)  G'’  TO  1170 
I N  D  E  X  =  3 
GC  TC  1000 

NUN  ADDED  rr  OUTrjr  w IN£ ;  LENGTH  LESS  THAN  OF  EQUAL  TO  PE L M AX  (1) 

1170  CONTINUE 

CHCCL  =  .  T  9  UE . 

ST  A  7  U  $-  1 
PETUPN 

PUN  ADDED  UNTIL  PEL M  f  X  EXCEEDED;  LINE  TCO  LTNG  12) 

UFO  CONTINUE 

IF(OIAG)  v-  TT  E( 6. 1 1 35 )  ( CT8UF { I , C TCDO ) . T  =  1 , 60 ) 

1135  FGr MAT (6Z 10 ) 

STATUS=2 

RETURN 


NO  MATCH  FFUMO  IN  CGJE  TABLE  (3) 


1  1 c  0  CONTINUE 
ST  AT  US  ~3 
F  E  TURN 

ECL1  DETECTED  (A) 

1200  CONTINUE 
ST  \7CS=A 
RE  TURN 

ECL2  DETECTED  (5) 


1205  CONTINUE 
ST.',  TUS=5 
PETUPN 
END 

SU3RCUTINF  TW=FNG<  I  NDEX  ,  C  OLCR  ,  5 T  A  TUS  ,  L  ) 

implicit  integer  i  r-z) 

c*******  LABELED  CO  A*  MON  /G32BI  T  /  ******* 

c 

CCMMCN  / 3  32  31  T/M*.  SK(32  )  »C  QM  '.SK(32),LIB"T  (32  )  » LZ  E IT (  32) 
INTEGER  M  ASK,  C=>YA  S<  .LIb!T,LZP  I  T 

c 

COMM0N/3UFF /=ELBJF(  60,2)  ,  CDesU  F  (■  2  4  0  )  , C T°UF ( 6 0 , 2 )  . 

*  STF3UC(  240  )  .  ST  AT  1  3000 ) 

CCMMCN/HUFF /r- 3,92»2)»  CODEPU (3.1  I  ) 

COMMON  /ER.<Y/EPR09S(  10000) 

FILE  DEFINITIONS  ******************** 


C CM xrN/FT  L - S/TrrM.LP^lL. =  ELF IL, OTFTL. r  =  FTL 


0 0  0  0=  23  0 
00000300 
0  00  OR  21  0 
0000=320 
00000330 
000  0934  0 
0000=350 
0000=350 
0000=370 
0000=330, 
0000=3=0 
0000=400 
0000=41 0 
0000=420 
0000=430 
000  0=44  ot 
0000=450 
0000=450 
0000=470 
0000  =  430' 
000  09  A  o  p: 
00009500; 
oooo=5i  o; 
0000=520’ 
0000=530 
0000=540 
0000=  550: 
0000=55  0 
000  0=570 
0000=530 
0000=  5  =  0 
0000=600 
0000=6  1  0, 
0000=620 
0000=630' 
0000=640 
0000=650 
000  0  =  66 0 
0000=67  0 
0000=630 
000096=0 
0000=700 
0000=71 0 
0000=720. 
0000=730 
0000=^40 
0000=750 
0000=750 
O 0 0  0=  T 7  0 
0000=760 
0000=730 
0000=300 
0000=31 0 
0000=32  0 
0000=830 
00009340 
0000=550 
0000=350 
0000=970 
00009690 
000  0=930 
0000=900 
0000=010 
0000=320 
0000=930 
00009940 
00009=50 
00009=50 
0000=970 
0000=0=0 
0000=9=  0 
00010000 
000  10010 
00010020 
00010030 
000  1004  0 
000 10050 
0001 0060 
00010070 
00010030 
00010030 
00010100 


L-\T- 


UNC L ■  SS  IF IFD 


n^o  nnnAnn  nnn  nnn  non  r>nr> 


UNC LASSIFIED 


C  **************** *****  USELLED  COMMON  VARIA3LES  ********************** 

C 

C04MCN/I  V  »F  /=>ELMf.X,  Vf-  £S.E3H-*.SC.CMFMf  X  .  E->PMrD,LI  NMAX ,K 
CC-1MDN/PV  *5  /IN.N'J]  .  jTLNMC  iTTEL*'  .  I  HE  LP  «  CDELP  ,  CTE  LP  .  C  DEL*  » 

*  CDELCT,  INELCT  ,T  CD  *.T  A  ,  TC  DEL  ,  ERRPNT  ,  EfiROFF  .  E-.  RUM  , 

*  ERCCMT,  I  NLMCT  , CC  H SEC , T NFC NT . LNNCBF ,  KCNT, 

*  I  NCnD  •  INF.EF.CTCLD.CTREF  .STF9IT 
COMMON/ ICH* '/00< T I , MM , TT .NN, YY 

commcn/lcg:  C/SFARCH.D! \g,  sync, write ,zfrc. left, cfcol. one, whi  t=. 

AF I LEND 

LOGICAL  SF‘«CH, OIAG, SYMC .WRITE  »ZERr .LeFT .CHCCL. CNE, WHI T£, FI  LEND 
BEGIN  DEC  OOF  LOn=;  RETRIEVE  NEXT  CODE  WORD  LENGTH  <L) 

1000  CONTINUE 

1002  LENBIT=CODEF.D(  1  ,  INDEX) 

CALL  GETLEI LENBIT, MODE.LBITS.L) 

IF(DIAG)  WRITEI6.1003 >  LEf-lBIT  ,  MODE » LBI TS , L 
100  3  FCRm  *T (2  I  6,  Z12.  15) 

GO  TO  ( 1 040  .1200. 1205. 1  ICO) ,  MODE 
STOP  1040 
1040  CONTINUF 

IF  (LSI  TS.  EO. CODER  D(  3  ,  INDEX)  )  G"'  TO  1100 

Nj  match:  ADVANCE  CODE  WORD  INDEX  VI/  DECODE  THREAD 

INO£X=CrDERC( 2, INDEX) 

IF  (  INDEX.  GE.l  2 )  GO  TO  110  0 

IF (CPDERD < 1 , INDEX ).Ea.LENB2 T)  GO  Tn  1040 
CODE  WORD  LONGER;  FPDM  THE  TOP 


MATCH  FOUND 

1100  CONTINUE 

CDELR=CDEL=+L 

NCT  AN  EOL 


FIND  fll  AND  32 
AO=CTELP 

IF  (OTELP.EQ.l  )  A  0  - 0 
°CL  =  Ct  LOR-1 

DETECT  SI 


000  10110 
00010120 
000101 30 
00010140 
00010150 
00010160 
00010170 
000  101  90t 
000  101901 
00010200 
00010201 
000  1021  Ol 
00010220I 
000  10230J 
000  io?»o( 
000  102501 
000  102601 
000 1 027  0? 
000 102901 
00010290? 
00010300} 
000  1031  Of 
000  1  0  32  Oi 
000  10330! 
000  10340; 
000  10350, 
000  10360; 
000  10370, 
000  10390, 
000  1035  0: 
000  10400 
000  1041  o; 
000 1 0420 
00010430' 
00010443, 
000 10450 
000 1 0460 
00010470 
000  10430 
000 104=0 
00010500 
000  1051 0 
00010520 
00010530, 
00010540 
00010550 
000  10560 
00C  105’0 
000 10590 
000  1  05=0 
000  *  0600 


1=50+1 

IF ( I ,GT.PE_ M* X)  GD  TC  65 
P£LM 1-0 

I F  (  ,0.30.0)  5r‘  T~  50 
PEL Ml= 143 (DT3UC  < 1 , CTREE  )  , AO, 1  ) 
50  CONTINUE 

°SL= I  4  9( CTPUF (1»DTREF),I,1) 

IF  (  =  EL  .NE.=  ELVl  )  G  Z  TD  70 
60  CONTINUE 
=ELM1=PEL 
1  =  1  +  1 

IF{  I.LE.°E_M+X)  GD  TC  50 
65  CONTINUE 
3  1=  I 

GO  TO  52 
70  CCNTINUE 

IF  (  =EL.NE  .FDL  )  3?-  TO  PO 

GO  TC  60 
50  CONTINUE 
Bl=  1 
FC  L=  PEL 

DETECT  B  2 


000 1 061 0 
000 1 062  C 
000 1063C 
000 1 064  0 
000 1 0650 
00010660 
000 1 0670 
000  10690 
000  106=  0 
000 1 0700 
OOO  10710 
000 10720 
000  1  0-30 
000 10-40 
000 1 0750 
000  10750 
00010+70 
000  10790 
000  107=  0 
000 10900 
0001091 0 
000 1 0920 
000 1 0C30 
000 1 0940 


1=91+1 

IF( T .GT.PElMAX )  GD  TD  52 
PI  CCNTIIPF 

PE  L=  I4HIC  T:lUr  (  1  »  D  T"  CF),  I,  1  ) 
IF  (==L.NE.=TL  )  Gr  T T  52 

1=1  +  1 

I F ( J .LE.PEL M» * )  3?  TO  61 


000 1 C550 
0031 0960 
OOOIOP’O 
000  109  9  0 

0  00  1 o°=  0 

00010=33 
COO  1 05 1  0 


013 


UNCL?  SS  Tc  TFD 


n  n  n  non  non  nnn  nnnn  non  non  non  r.  no 


UNCLASSIFIED 


5?  continue 

R2=  : 

GO  70  (  1  30. 200 . 300 , 400 .403. A  CO. ft  00. f 00, *00 J  .  INDFX 

ST''-’  100 

3  -  SS  NCDE 

103  CCNTINUF 

F  Ut  L  EN  =  B2— "  TEL5 
Ch:ri-.F ALSE. 

GO  TO  1  1  1  55  ,1  1  AS)  ,  :  GLOP 

HORIZONTAL  MODE 

200  CONTINUE 
ENTr.Y-3 

CAi_L  ONFENG  (ENTRY  .  COLOR.  STA  TE  .L  ) 

GO  TO  (2 1  0.  1  1  PO  ,  1  19 0 . 1  200 . 1205)  . ST7 TE 
£10  CONTINUE 

C  OL  C  R=MC  n  ( c  HLC  " +  2  .  2  )  +1 
ENT~ Y=3 

CALL  C1MFEMG  (  ENT  RY  .COLOR, ST*  TE  .L  ) 

GC  TO  (220, 11  ?0il  100, 1200  >1205)  .STATE 
£20  CONTINUE 

C  HC  r  i_=»TFUE. 
vsC  TO  116  0 

VERTICAL  MODc  A  1 P 1 = 0 

000  CONTINUE 

RUM-2N  =  C1  -CTELP 
CHCCL=.T=UE. 

GO  TO  < 1155*1 145) .COLON 

VERTICAL  CPC  VR1  A  13  1=1, 2, 3 

4  0  U  CONTINUE 

RUNL  EN=  fl  1 -C  T  EL  ■= -FIND  EX-3 
CHCCL=.TRUC. 

G"  TO  (  1  1  55. 1  145)  .COLOR 


VERTICAL  4'De  LEFT  VLl  4131=1,2.3 

600  CONTINUE 

RUNL  EN  =  31 —0  TcLD— (  INDEX-6) 

CHCCL=. TRUE . 

GO  TO  ( 11 55,1 145) .COLOR 

A 00  BLACK  RUN  TO  CUTOUT  SUFFER 

1145  CONTINUE 

I  F  (  -UNL  Ev'  )  1190, 1160,11  47 

1147  CONTINUE 

DO  1150  1=1  ,T  U*'LEN 

CALL  MI  23 (CCL^R-l . DTBUFI  1  .OTCOO ) ,CTEL°,  1  ) 

CTELF  =  CTELF  +1 

IF(  C  TEL=>-  1.  GT  .DELMA  X)  GO  TO  1180 
1150  CONTINUE 

GC  TC  1160 

ADD  WHITE  RUN  TC  OUTPUT  BUFFER  I  BY  DEFAULT) 

1155  CONTINUE 

IF (CUNLFN.l T.O)  GO  TO  1190 
CT  EL  ■->=  CTELP  ARUN'LFN 

IF ( CTELa-l . GT#c ELMAX )  GO  TO  1180 

RUN  ADDED  TP  OUTPUT  . INE 5  LENGTH  LESS  THAN  OF  EQUAL  TO  aELM AX  (1) 

1160  CONTINUE 
ST  AT  US= 1 
RETURN 

RUN  ADDED  UNTIL  =>ELMAX  EXCEEDED?  LINE  TOO  LONG  (?) 
lieo  CONTINUE 

IF(OIAG)  W  ITE<  6, 11  86)  (  CTE'JF  (  I  ,  OT  C  PD  )  .  T  =  1 , 60  ) 

1165  FCRM4T(6Z10) 

ST AIUS=2 
f-E  TURN 


000  109  20 
000 10930 
COO  10SA0 
OOC 10950 
0001  095  0 
000 1 OP^O 
000 10980 
000 10990 
00011000 
000 1 1 01 0, 
000  1  1020 
000  1  1 030  j 

ooo  1 1 040: 

000 1 1 050 
000 11060 
000 1 ! 070 
00011090 
000  1  1390 
000  11100 
000  1  1  1  1  0 
000  11  120 
000  1  1  1  30 
000  11  140 
000  1  1  150 
00011150 
00011190 
000  11  18  3 
00011 1 90 
000  11200 
00011210 
000  1  1290 
000  1  1230 
000  1 1 2»0 
000  11250 
000  11250 
00011 270 
000  11280 
000 11290 
00011330 
00011310 
000 11320 
00011330 
00011340 
0001 1350 
000  11360 
C03  1  1  370 
000 11390 
000  11390 
00011 400 
000  1141 0 
00011420 
000  11430 
OOC  1 1 A40 
COO  1 1 450 
00011460 
000 11 470 
00011480 
000U4=>0 
000 11500 
000  1 151  O' 
00011520 
000 11 530 
000  11 540 
000  11550 
00011550 
000 11570 
000 11530 
00011590 
000  11630 
0001161 0 
00011620 
000  11630 
000  11640 
000 1 1650 
000 11550 
000 11670 
000 1 1680 
000  11690 
000  1  1700 
0001  1710 
000  1  1720 
000 11730 


CM 


UNCL'  SS  IF IED 


<o  O  uu(u  uuu 


UNCLASS  IFIEO 


NC  MVTCH  F  C  UN  D  IN  CODE  T/.3LE  (3) 

1190  CONTINUE 
ST  •»  T  LS=  3 
RETURN 

FCLl  DETECTED  (4) 

1200  CONTINUE 
ST*  TUS=4 
RETURN 

ECL2  DETECTED  (5) 

1205  CONTINUE 
STAT JS=5 
RETURN 
END 

3LCCK.  DATA 
C 

IMPLICIT  TNTESF9IA-Z) 

c ***********************  file  definitions  ******************** 

c 

C  CMMPN/*=  ILF  S/TERM  ,LPF I L. PELF?  L.CTFTL.ERFIL 

c 

CO  *  L'N/  BUFF /P  ELD  J  F  I  6  0  «  2  )  ,  CDDUFI  240)  ,D  TBUF  (60.2)  . 

*  STFEJF1240).  ST  A  T ( 3000 ) 

C  C  •'vfM/HUF  F  /C=  PEI  3.02.3)  .CODE  RD<  3. 1  1  ) 

CCV^CN/E RAY /Ernies J  10000) 

C. ******** * ******* *** **  L- BELLED  COMMON  VFFIAELFS  ********************** 

C 

C  CM*CN/!  VAE/PELM'  X  ,  V»  ES,  E=>HA  SE.  CMPM  AX  .  EC  ~  M<2  C  .L I  AMA  X  ,  K 
CD*  ■MN/DVA^/IN.  NND.  I  TLNNC  ,OTF'  W  .  1  N"  LP  ,  COELP  .  OTE  L P  . E  DF  L*>  . 

*  COFLCT . INELCT.TC  A . T  = DEL . ERR ° NT . E CBpF F , E= RL IM , 

*  f'CNT,  INLMCT.COt'  *  .  ON  F  C  NT  .  LNNCBF  .  KCK~  , 

*  INC 03.  INPSF.CTCCO.  Tirr.sTFRTT 
CC-1M0N/ICH*  ~/DD. I  I  .  MM, TT.NN.YY 

C  DM  O-J/LCG:  C/S  ‘'ARC-1,  D1AG.  SYNC  .  »RI  Tf  ,7FP0  .LEFT  .CFCTL  .TNi  ,  »H!  TE. 

*F ILEND 

LDGICk-  SFf  <-CH.  DI  <s.  FYNC  ,  wr  I  TC  .ZFR1-  .  Lc(rT,r HC PL  .  CNE  .  WHT-C,  FI  LEND 


TF'V,L PF  XL «  aEL F  1L, DTFILi 


DATA  DD  ,11,  M*1 ,  T  T 
Of  T->  ^ELV'X  ,VI.CS 


NN . YY/ ’ D '  t  ’  1  ’  t  •  M* 


,1.2.3/ 

•  N  *  ,  •  Y  •  / 


00011740 
000 1 1 750 
000  l  1760 
000  11770 
000  1  1  >S0 
000  11790 
ODD  1 1 900 
000  1 1  91  0 

ooo  i  ie2o 
000 11930 
000119*0 
00011950 
000  11 Q60 
000  11870 
000 11990 

ooon  eso 

000  11900 
00011510 
00011920 
00011930 
000 1 1 940 
000 11550, 
OOO  1  1950  1 
00011070' 
030119S0| 
000119=0 
000 12000* 
00012010 
00012020 
00012030 
000 1 2  0*  0 
00012050 
000 120^0 
00013070' 
00013090 
000120=0 
000  12100 
000  121  1  3 
000  121  1  1 
OOO  12123 
000121  3  0 
00012140 
000121 50 


ED  Hr.  S  P  «  C  M°M7  X, EFT MpD.LINMAX/l  —  79,?, 0,  =  6,  *T*.  30  00/00012160 


DATa  « / 2/ 
DATA  C  I  A  0/ « 

DATA  CC  PEI 

FALSE. 

It  It 

/ 

i ) 

CODE ( 2. 

1  . 

1  > 

.rroE i 3, 

i , 

1  )  / 

9. 

70.  7  0035/ 

00012170 
000 171  BO 
000  121  =  0 
000  13?io 

DATA 

CODE! 

1 

p  9 

i  ) 

:  ode ( 2, 

•E  « 

1  ) 

.CCDE  (  ■>, 

2, 

1  )  / 

6, 

CO,  20007/ 

000  1  2  f  2  0 

data 

c:  DEI 

1 

3. 

i  ) 

C  ODE (  2. 

3. 

1  ) 

, C  E Dr  I  3, 

3  . 

1  )  / 

4  , 

4, Z 000T/ 

000  13970 

DAT  A 

CPOF  ( 

1 

4  . 

i  ) 

COE  (2. 

4  , 

1  ) 

,  C  PDF  I  3, 

4  , 

1  )  / 

4, 

5,  2  0  00  3/ 

0  0  0  1  7  9  A  0 

DATA 

C2PEI 

1 

5 . 

i ) 

C  OF  (  2. 

5, 

1  ) 

. CEDF ( 3, 

5, 

1  1  / 

4. 

6,  Z  0  00  B/ 

0  00  1  39*0 

D  AT  A 

core  ( 

1 

L>  • 

i  ) 

CPDE <  2. 

6. 

1  ) 

,rrnF ( 3. 

6  . 

1  )  / 

4  , 

7,  2  0  00C/ 

000 17960 

Ok  7  A 

ccoe  < i 

7  , 

i  ) 

E ODE ( 2  , 

7  . 

1  ) 

.CPE  (  3  . 

7  , 

1  1  / 

4, 

C,  7  0  00  =/ 

000  13F 70 

DATA 

CC  DM 

1 

a  , 

i  ) 

CEDE  <  2. 

S. 

1  1 

.ECDE  I  3, 

9. 

1  )  / 

4, 

=,  2000F/ 

000  13990 

DATA 

COOF  ( 

1 

c  , 

i  ) 

C  DDE ( 2. 

9  , 

1  ) 

,  E  C D F  I  3, 

5  . 

1  )  / 

5, 

1  0,  Z  001  3/ 

000  139  =  0 

d;  t  a 

C~DE( 

1 

1  0  . 

i  ) 

C  ODE  (  2. 

1  0. 

1  1 

, E  rpr ( 3, 

1  0. 

1  )  / 

5, 

1  1  ,  Z001  4/ 

00013=00 

DATA 

CEDE  ( 

1 

1  1  . 

i  ) 

CCME  (2, 

1  1  . 

1  ) 

. E  2  DF I  3, 

1  1  . 

1  )  / 

5, 

1  2,  7000-/ 

00013=10 

0  IT  A 

1 

!  2. 

i  ) 

C ~DE( 2. 

1  2. 

1  ) 

.  r  rr>r  {  3, 

1  2. 

1  )  / 

5, 

65,  20009/ 

000  13  =  20 

DATA 

CP  DEI 

1 

1  3. 

i  ) 

EC  PE  (  2. 

1  3. 

1  ) 

,rnnr  (  = . 

1  3  . 

1  )  / 

6, 

1  4,  Z  0  00  6/ 

000  13  =  30 

D«  T  1 

CODE  ( 

1 

14. 

i  ) 

C  DDE ( 2. 

1  4, 

1  ) 

,  C  CDF  I  3, 

1  4  , 

1  )  / 

6, 

1  5,  Z  0  00  2/ 

00 C 13=43 

DMA 

CEDE! 

1 

1  5. 

i  ) 

COPE ( 2. 

15, 

1  ) 

«  E  PDF  I  3, 

1  5  . 

1  )  / 

6. 

1  6,  ZO 03 4 / 

00013=50 

D  AT  A 

CEDE! 1 

1  n. 

t  ) 

CODE  <  2. 

19, 

1  ! 

«  E E DF I  3. 

1  6. 

1  )  / 

6. 

1  7,  7  0  035/ 

000  13  =  50 

D  \T  A 

P  ?  O  F  I 

1 

1  7. 

i ) 

C  DDE (  2, 

17. 

1  ) 

, C  EPF ( 7, 

17, 

1  )  / 

6, 

1  5,  Z002A  / 

000  1  7C  *0 

DATA 

CC  DE( 

1 

1  9. 

i  ) 

CL  PE ( 2, 

IP. 

1  ) 

, C P DF (  3  . 

i  e . 

1  )  / 

6, 

1  9.  70029/ 

000 13=a0 

D  T  « 

CPDE  ( 

1 

1  A  , 

i  ) 

E  ODE (  2, 

15. 

1  ) 

, E  PDF ( 3. 

19. 

1  )  / 

■7 

20,  Z  002  7/ 

0  00 1 3=  =  0 

0  M  A 

C*  =  F( 

1 

20, 

i  ) 

r  me  (  2. 

20. 

1  > 

,CCDF I 3, 

20. 

1  )  / 

T 

9 

2  1 , 2000C/ 

000  140  =  0 

DAT  A 

CEDF  ( 

1 

21  . 

i  ) 

V  ODE (  2, 

2  1  . 

1  ) 

, E  THE  I  3. 

2  1  . 

1  )  / 

22. 2000°/ 

000  1  A  0 1 0 

D.  T  X 

C  ■"  D  F  ( 

1 

2Zt 

i  ) 

C  ME  (  2. 

2  2, 

1  ) 

.ED DF ( 3 , 

22  . 

1  )  / 

7  , 

23.  7001  7/ 

000 14=20 

D  AT  A 

C’"’  DF  ( 

1 

l  3 1 

i  ) 

CP  HU  2. 

23. 

1  1 

, CEDF I  3. 

23, 

1  )  / 

7, 

24, 70003/ 

00=14030 

DMA 

CEDE  ( 

1 

~  4  ♦ 

i  > 

C .DEI  2. 

2  4, 

1  ) 

. CEDF ( 3. 

24, 

1  )  / 

• 

2  5,  7  0  004/ 

0  00  1  4  04  0 

DATA 

C'DF  | 

1 

Z  3* 

i ) 

C'->E<  2. 

2  5. 

1  ) 

.Eror I  3. 

2  5  . 

1  1  / 

7  t 

26,70029/ 

000140=3 

D.-T  1 

c  p  d  r  (  i 

:?*♦ 

i  ) 

Po,>r  i  2. 

2  0, 

1  1 

, C  PDF  I  3, 

26. 

1  )  / 

7  . 

2  7,  2  0  020/ 

000  1  4  0  6  E 

0-.T  * 

cedu 

1 

, 

i  ) 

:  PDF  I  2, 

2  , 

1  1 

•  C  PDF  (  3. 

2  7  , 

1  )  / 

7  . 

2  3,  7  0  01  3  / 

0  0  0  1  4  0  7  .= 

DAT  4 

r  P  D  F  ( 

1 

?  ^ « 

i  > 

C  -  .PE  I  2. 

3i’f 

1  ) 

. r "nr i 3. 

?e, 

1  )  / 

7  « 

r^,  7  0  0?  4  / 

0  0  C  1  A  0  9  0 

DM'. 

cr  nr  ( 

1 

i  - 

l  ) 

E  IL'EI  2. 

2V  . 

1  1 

, r~»r ( 7, 

29  . 

1  1  / 

9 

<  5,  7  0  01  9  / 

0  0  0  1-*0  =  0 

data 

DU 

1 

j  )  * 

i  ) 

E  J'JE  I  2. 

00. 

1  > 

.C'MT  (  3, 

30. 

1  )  / 

P  . 

31. ’OOO?/ 

0  J  0  1  4  1  0  3 

DM., 

rC  D  F  ( 

j 

3  1  , 

i  ) 

C  DDE  I  2. 

2  1  , 

!  1 

. ‘"EDE I  7, 

3  1  . 

1  )  / 

r  , 

22. 70003/ 

0  0  0  1  4  1  1  C 

DMA 

c:  =r< 

1 

~i  2 « 

i  ) 

CODE ( 2. 

32, 

1  ) 

, E  PDF  I  7, 

32  . 

1  )  / 

5  • 

3  3,  7  0  01  A/ 

0301417= 

DATA 

E'pri 

1 

I7  «3  • 

i  ) 

C  DDE  I  2. 

23. 

1  1 

, cpnr ( 3, 

2'  3  , 

1  )  / 

F  * 

34,  7  001  2/ 

0  0  0  14  1 3  0 

DMA 

P'  D  E  I 

1 

4 1 

i ) 

C  DEI  2, 

34  , 

1  ) 

.  '  -nr  I  7. 

74  , 

1  1  / 

p  , 

3  5,  7  0  01  2/ 

0  0  0  1  4  1  A  = 

DATA 

CDDt  ( 

1 

DD, 

i  ) 

CPDE I  2, 

2  5. 

1  > 

.  C  r  r  F  (  3  . 

35. 

1  )  / 

c 

• 

3  6.  7  0  01  3  / 

00014152 

UNCL  *  55  IT  IER 


DNCL-»SS  TFT  ED 


O'-  TA 

CODE ( 1 , 

36. 

1  ) 

.CODE! 2 , 

36, 

1  ) 

.CODE  I  3. 

36 

.  1  ) 

/ 

F  . 

3"\  Z  001  4/ 

00014160 

D;*T  4 

CCDE!  1  , 

3  7, 

1  ) 

, C  CDC( 2. 

?■’, 

1  ) 

.CODE  13, 

37 

.  1  ) 

/ 

9. 

33,  70  01 5/ 

00014170 

DATA 

CCDEI 1 . 

33. 

1  ) 

, CODE ( 2, 

33, 

!  ) 

.CODE  I  3 , 

3  8 

.  1  ) 

/ 

8. 

3  =  ,  2001  6/ 

000 14180 

OTA 

CrDF( 1 , 

3?  , 

1  ) 

. CEDE! 2. 

2C  . 

1  > 

, C DDF  I 3 , 

39 

.  1  > 

/ 

e. 

4  0,  Z001  7/ 

00014190 

DATA 

CC  DEI  1  , 

40  , 

1  ) 

.  C’-'DCt  2. 

40. 

1  > 

.Cnor I  3, 

4  0 

.  1  ) 

/ 

8. 

4  1  ,  zo  02  e/ 

000  14200 

DaTA 

CLOU  1  . 

4  1  . 

1  ) 

.CCDE12, 

4  1  , 

1  ) 

.CODE  I 3 . 

4  1 

.  1  ) 

/ 

Q. 

42,  Z  0  02  5/ 

COO  1421 0 

D-'TA 

FrTE(  1. 

43. 

1  ) 

,  CODE  I  2. 

42. 

1  ) 

.CODE  I  3 , 

4  2 

.  1  1 

/ 

8. 

4  3,  Z  0  02  A/ 

00014270 

DATA 

CCDE ( 1 . 

4  3, 

1  ) 

,C JDEI 2, 

43. 

1  ) 

, CODE  I  3. 

43 

,  1  > 

✓ 

3. 

4  4,  Z0  02R/ 

000  14  230, 

D  ’  T  A 

cron  l . 

44, 

1  ) 

. C  ODE  I  2, 

4  4, 

1  ) 

•CODE ( 3, 

4  4 

.  1  > 

/ 

8. 

45,  Z  0  02C/ 

000  14240! 

DAT  A 

CC  DEI  1  , 

45. 

1  > 

.  CODE ( 2, 

4  5, 

1  ) 

, CCDEI  3 , 

45 

,  1  ) 

/ 

8. 

46,  Z002D/ 

000  14250' 

D  ■“  T  A 

CEDE (  1  . 

4b, 

1  ) 

•C2DCI2, 

4  6, 

1  ) 

,rrr>f:  ( 3, 

46 

.  1  ) 

/ 

8, 

4  7,  Z  0  00  4  / 

000  14260' 

DATA 

C.JDEl  1  . 

4  7, 

1  ) 

, CODE  I  2, 

47. 

1  ) 

.CEDE  I 3 , 

47 

,  1  ) 

/ 

8, 

48,  Z0005/ 

000  142701 

DAT  A 

rCDE(  1  , 

4  0, 

1  ) 

, C  DDE ( 2 . 

4  8. 

1  ) 

,1-CDEI  3, 

48 

,  1  > 

/ 

8. 

49, Z  0  00 A/ 

000  142601 

DhT  \ 

CEDE {  1  . 

4  =  , 

1  ) 

.CODE! 2. 

4  0, 

1  ) 

.CODE (3, 

4  9 

,  1  ) 

/ 

8  , 

5  0 ,  Z  0  00  9/ 

000 147=01 

OAT  A 

CC  DEI  1  , 

E  0. 

1  ) 

, CODE  <  2, 

EO, 

1  ) 

.CCDEI 3, 

50 

.  1  ) 

/ 

8. 

51  ,  Z  0  05  2 / 

000  14300( 

DATA 

c: DE<  1  , 

01  . 

1  ) 

.CODE  I  2, 

51  . 

1  ) 

•  cf-deit. 

51 

,  1  ) 

/ 

8, 

52,  Z  00c3/ 

000  1431  Ol 

DATA 

CEDE!  1  , 

53, 

1  ) 

.CE DEI  2. 

52, 

1  ) 

.CCDEI 3. 

52 

.  1  > 

/ 

8, 

53, 20054/ 

000 14?2D( 

D  AT  \ 

CODE! 1 , 

53, 

1  ) 

.CODE! 2, 

53. 

1  1 

, CODE  13, 

S3 

,  1  ) 

/ 

F, 

54,  Z  0055/ 

000  1  4  330f 

DATA 

CD  D  E  (  1  . 

54, 

1  ) 

.CODE  2, 

54. 

1  ) 

.CEDE  I 3  , 

54 

.  1  ) 

/ 

3, 

55,  Z  0  02  4/ 

000  143*0; 

DATA 

c:oe( 1 . 

55. 

1  ) 

, C  DDE! 2. 

E  5  « 

1  1 

. C CDE I  3, 

F5 

.  1  ) 

/ 

3, 

56,  Z  0025/ 

000  1 4  3 5  0 1 

D-.T  A 

CE  DEI  1  , 

56. 

1  ) 

, CODE  I 2, 

E  6  , 

1  ) 

, CODE ( 3, 

56 

.1  ) 

/ 

8, 

5"',  Z  0  05  8/ 

000  14  36  0; 

DAT  A 

CC  DF(  1  , 

57, 

1  ) 

.CODE! 2, 

57, 

1  1 

, C  r  DE I  3 , 

57 

.  1  ) 

✓ 

3, 

5  3,20  05  9/ 

000 14270 

D.AT.A 

CODE ( 1 . 

53. 

1  ) 

•CODE ( 2 , 

5  6, 

1  ) 

. CO  OF  I 

58 

.  1  ) 

/ 

8. 

5  0,  7  0  05// 

000  14  3D0‘ 

D  5  T  A 

CEDE!  1, 

5=, 

1  ) 

•  CC  DE ( 2  . 

E  9  , 

1  ) 

.CEDE  I  3, 

59 

.  1  ) 

/ 

8, 

60.  Z0050/ 

00014390' 

D  T  A 

C  CD  E (  1  . 

6  0, 

1  ) 

«  C  DDE 12, 

60  . 

1  ) 

, C  DDE ( 3 . 

60 

.  1  > 

/ 

8. 

6  1,  Z  0  94  A  / 

000 14400 

D  i  Ta 

CODE!  1  . 

61  . 

1  ) 

.CODE! 2. 

61  . 

1  1 

.CODE  I  3  , 

6  1 

.  1  ) 

/ 

6  , 

62.  ZO  04  B/ 

0001441 0 

D  AT  A 

CC  DEI  1  , 

62. 

1  ) 

.CODE  I  2, 

f  2. 

1  ) 

. Cr  DE I 3. 

62 

.  1  ) 

/ 

8, 

63,70032/ 

000144=0' 

DaT^ 

C"DE(  1  , 

t  3, 

1  ) 

t  C  DDE  12, 

6  3, 

1  ) 

, C  CDF  I ?. 

63 

.  1  ) 

/ 

3. 

64,  Z  0  03  3/ 

000 14430 

DAT  A 

CE  DF  <  1  , 

64, 

1  ) 

.CODE  I  2. 

6A 

1  ) 

.CCDEI 3, 

64 

.  1) 

✓ 

8, 

6  c,  7  0  034/ 

000 14440 

D  •  T  A 

CODE (  1  , 

65, 

1  ) 

.CODE!  2, 

EE  , 

1  ) 

, r ODE (3. 

65 

.  1  ) 

/ 

5, 

66,  Z001  8/ 

000 14450 

data 

CE'  D  E I  1  . 

6  6, 

1  ) 

. E  ODE (  2, 

66, 

1  ) 

.CODE  I  3. 

66 

.  1  ) 

/ 

5. 

67,  2001  2/ 

000144*0 

DATA 

CODE! l , 

67. 

1  ) 

, CODE! 2, 

67, 

1  ) 

, r DDE  I  3. 

67 

.  !  ) 

/ 

6. 

2.  Z  001  7/ 

000  14  470 

DATA 

CEDE! 1, 

68, 

1  ) 

•CODE! 2, 

63. 

1  1 

.CEDE  I  3. 

68 

,  1  ) 

/ 

7. 

30, Z  0037/ 

000  14490 

DAT  A 

CODE! 1 , 

6C, 

1  ) 

.CODE ( 2, 

69. 

1  ) 

.CCDEt  3, 

65 

.  1  ) 

/ 

8, 

1  , Z0076/ 

000  14490 

D  >*  T  A 

code i  i  . 

■’0, 

1  ) 

,  C  3  D  E  I  2  , 

70. 

1  ) 

,CrDE(3, 

70 

.  1  ) 

/ 

e. 

71, Z0037/ 

000  14500 

DATA 

CC  DEI  1 . 

71  . 

1  ) 

.CCDEt  2, 

71  . 

1  ) 

, C  CDF ( 3. 

71 

.  1  ) 

/ 

a. 

72, 20064/ 

000  1451  0 

O'-  T  A 

CODE! 1 , 

-’2, 

1  ) 

.  C  ODE  (  2, 

72, 

1  ) 

, CEDE (3, 

72 

.  1  ) 

/ 

9. 

73,  Z  0065/ 

000  14520 

D*'  TA 

CODE!  1. 

7  3. 

1  ) 

.  CE  DEI  2, 

73. 

1  1 

, C  CDF  I  3, 

73 

.1  ) 

/ 

8. 

74.  Z  0  06  8  / 

00014530 

DAT  A 

CODE! 1, 

74, 

1  ) 

, CODE! 2, 

74. 

1  ) 

.CCDEI 3, 

74 

.1  ) 

/ 

3, 

75.  Z006.7/ 

000  145*  0 

O  *>  TA 

CEDFI  1  , 

’6. 

1  ) 

, CODE! 2. 

75. 

1  ) 

,  C  r  DE’  I  3  , 

75 

.  1  ) 

/ 

9, 

76,  zoocr/ 

000  1*550 

DAT  A 

CEDE! 1 , 

76. 

1  ) 

.CODE! 2. 

76, 

1  ) 

.CODE! 3, 

76 

.  1  ) 

/ 

5. 

77,  ZOOCD/ 

000  145*  0 

DATA 

CODE! 1 , 

77, 

1  1 

•CODE! 2, 

77, 

1  ) 

.CODE (3. 

77 

.  1) 

✓ 

9, 

73,  Z00D2/ 

00014570 

DATA 

CE  DEI  I, 

73, 

1  ) 

■  C IDE  I  2. 

70. 

1  ) 

, C  CDF (3. 

78 

,  1  ) 

/ 

9, 

79,  7Q0D3/ 

000  14530 

DATA 

CC  OE  I  1  , 

•’’  =  , 

1  ) 

,C JDEI 2. 

79, 

1  1 

,  C  ODE  (  3, 

79 

.  1  ) 

/ 

9. 

80,  Z00D4/ 

000  14590 

DATA 

CO  DEI  1 , 

5  0, 

1  ) 

.CODE! 2, 

80. 

1  ) 

, Cf  DE 13, 

30 

.  1  ) 

/ 

9, 

81 .Z00D5/ 

000  14600 

DAT  A 

CEDE!  1  , 

3  1  . 

1  ) 

.  CODE  (  2. 

81  . 

1  ) 

, CODEI 3, 

8  1 

.  1  1 

/ 

°, 

82.Z00D6/ 

000 1461 0 

D..TA 

CODE  I  1  , 

c  2  . 

1  ) 

,C"DEI 2, 

52, 

1  ) 

.c^tro. 

92 

.  1  1 

/ 

9, 

8  3,  7  0  05V 

00014620 

DATA 

C?  DEI  1, 

n  3, 

1  ) 

,EEDEI 2, 

£3, 

1  ) 

,CCDE I 3. 

83 

.1  > 

/ 

9 , 

84,  2000°/ 

00014630 

DATA 

CODE! 1 , 

54. 

1  ) 

. CODE! 2, 

84. 

1  1 

, 0  CDE 13. 

84 

.  1  1 

/ 

9 , 

85.Z00D9/ 

000  1464  0 

data 

CODE! 1 . 

c  5, 

1  ) 

.CODE! 2. 

es. 

1  ) 

, CTDE 13, 

35 

.1  ) 

/ 

9. 

e&. ZOODA/ 

00014650 

DAT  A 

CCOEI  1  , 

3  6, 

1  ) 

. CODE  I 2, 

£6  , 

1  ) 

.CEDE  I  3, 

86 

.  1  ) 

/ 

9. 

87,  ZOODB/ 

000 14650 

DATA 

CODE! 1 , 

£7, 

1  1 

, CODE  12, 

8’’. 

1  ) 

.CODE (3, 

e7 

.  1  ) 

/ 

5. 

8  8,  Z  0  09  8/ 

00014670 

DATA 

CC  DEI  1  , 

°». 

1  ) 

.CODE  I 2, 

88. 

1  ) 

.CCDE I  3. 

se 

.1  ) 

/ 

5, 

80,  Z  0 Oc  9 / 

000  14690 

DATA 

CC.DFI  I  , 

39. 

1  1 

•C0DEI2, 

89. 

1  ) 

,C0DEI3, 

89 

.  1  ) 

/ 

9. 

9  1  ,  Z  0  09  / 

0  00  1  46°  0 

DATA 

CODE! 1, 

5  0. 

1  ) 

.CCDEI  2, 

90, 

1  ) 

.CODE (3, 

90 

.  1) 

/ 

6. 

1  3,  Z001  8/ 

00014700 

DATA 

CODE  I  1  , 

=  1  . 

1  ) 

, C  ODE ( 2, 

9  1  , 

1  ) 

, C CDE I  3 , 

9  1 

.  1  ) 

/ 

9. 

c  2.  Z  0  Oc 8 / 

000 14710 

D-*  TA 

CEDE!  1, 

9  2. 

1  ) 

.CO DEI  2, 

92, 

1  ) 

, CODE ( 3 , 

92 

.  1  > 

/ 1  3 » 

9  3,  Z  0  003/ 

00014720 

OAT  A 

COD El  1 , 

1  . 

2  ) 

. C JOE  12, 

1, 

2) 

, CC  DF  (  3 , 

1 

.2) 

/10. 

65,  ZO037/ 

000 14730 

DATA 

CODE  I  1  , 

2, 

?  ) 

, CODE! 2, 

2, 

2  ) 

, CCDF 13, 

2 

.2) 

/ 

3. 

6,  Z  0  002/ 

000  147ao 

DATA 

CODE ( 1 , 

3, 

2) 

.CODE! 2, 

3, 

2) 

.CODE (3, 

3 

.2) 

/ 

2. 

4, Z0O03/ 

00014750 

O'TA 

CODE! 1 , 

A  , 

?  ) 

•CODE! 2, 

4, 

2  ) 

, CODE  I 3, 

4 

.2* 

/ 

2, 

5,  Z  0  002  / 

000  14750 

DA  T  A 

CO  DEI  1, 

5. 

2) 

, CCDEt  2, 

5, 

2) 

.CTDE 13, 

5 

.2) 

/ 

3. 

2,  ZO  00  3/ 

0001*770 

DATA 

CODE! 1 , 

6. 

2  ) 

,C0DE(2, 

6, 

2  ) 

.CCOEI 3. 

6 

.2) 

/ 

4, 

7,  Z 0003/ 

000  147o0 

DATA 

CODE!  1  , 

7, 

2  ) 

. CODE! 2, 

7, 

2  ) 

.CODE  13, 

7 

.2) 

/ 

4, 

S,  Z  0  00  2/ 

0001«7=o 

DAT  A 

CODE! 1 . 

8, 

2  ) 

, CODE  I  2, 

8. 

2) 

.CCDEI 3, 

e 

,2) 

✓ 

5, 

9,20003/ 

00014400 

DATA 

CODE ( 1 , 

9  . 

2) 

.CODE! 2, 

9, 

2  ) 

.CODE  13, 

9 

,2) 

/ 

6, 

1  0,  Z  0 005/ 

000  148  10 

O-'TA 

CE  DEI  1, 

10, 

2) 

.CODE! 2, 

10, 

2) 

,:rDE I  3. 

1  0 

,2) 

/ 

6, 

1  1  , Z0004/ 

00014820 

DATA 

CODE!  1  . 

1  1  . 

2  ) 

,C  ODEI 2, 

1  1. 

2) 

, C  CDE I  3, 

1  1 

.2) 

/ 

7, 

1  2.  Z  0  004  / 

000  14?  30 

O'TA 

CODE!  1, 

12, 

2  ) 

.CODE! 2. 

1  2. 

2) 

«  r  C  DE I 3  » 

1  2 

.2) 

/ 

7, 

1  3,  Z  0005/ 

000 i*e40 

DAT  A 

CODE! 1, 

1  3, 

2  ) 

.CODE!  2, 

1  3. 

2  ) 

.CCDEI 3. 

1  3 

.2) 

/ 

7, 

1 4, Z  0  007/ 

000 14350 

DATA 

CODE (  1  , 

1  4, 

2  ) 

, CODE! 2, 

14, 

2  ) 

, 0  rOE I  3, 

1  4 

.2) 

/ 

8, 

1  5,  Z0004/ 

000 14850 

O  AT  A 

CC  D  E  (  l  , 

1  5. 

2  ) 

.CODE ( 2, 

1  5, 

2) 

•  CODE  I  3, 

1  5 

.2) 

/ 

8. 

1 6, Z  0  007/ 

00014570 

DATA 

FODEI 1 , 

16. 

2  ) 

.CODE! 2, 

16, 

2  ) 

.CODE (3, 

1  6 

.2) 

/ 

9. 

1  7,  z  0  01  8/ 

000  14880 

DATA 

CODE!  1  , 

1  7, 

2  1 

.CODE  I  2. 

17, 

21 

.CTDE (3, 

1  7 

.2) 

/l  0, 

1  8,  Z001  7/ 

00014690 

DAT  A 

CCDEt  1  , 

18, 

2  ) 

.CODE! 2, 

18, 

2  ) 

.CCDEI 3, 

1  e 

.2) 

/10, 

1  9,  7001  3/ 

00014=00 

DATA 

CODE! 1 , 

19, 

2  ) 

,CrDEt  2, 

1  9  . 

2  ) 

, C  °DE 13. 

1 9 

.2  ) 

/10. 

1 , Z0003/ 

00014=1 0 

DATA 

CC  OF!  1  , 

20, 

2) 

, CODEI 2, 

20, 

2) 

.CCDEI 3. 

20 

.21 

/1 1 . 

21 . Z0057/ 

00014520 

D,  TA 

CODE!  1. 

?1  , 

2  ) 

, CODE  I 2 , 

2  1  . 

2  ) 

.CCDE I  3, 

2  1 

.2) 

/1 1. 

2  2,  Z  0  06  8/ 

000  1493  0 

DATA 

CC  DEI  I, 

22. 

2  ) 

.CODE! 2. 

22, 

2) 

, C  DDE ( 3 . 

22 

.2) 

/1 1 . 

23,  Z005C/ 

00014=40 

DATA 

CCDEt  1  , 

23  . 

2  1 

.  C  DO  E I  2 , 

23, 

2  ) 

.CODE  13. 

23 

.  2) 

/1 1. 

24,  Z  0  03  7/ 

000 14950 

DATA 

CEDE (  1, 

24, 

2) 

•CODE! 2. 

24, 

2) 

, nr DE ( 3, 

24 

.2) 

/1 1 . 

2  5.Z0023/ 

000  14  =  60 

OAT  A 

CCDEt  i  , 

25. 

2  ) 

. CODE! 2, 

25. 

2) 

, CC  DF I  3  , 

25 

,2) 

/1 1 . 

2  6,  7  '  01  7/ 

00014=70 

C-lw. 


UNCL' SS IF IHT 


UNCLASSIFIED 


D„T4 

CODE  ( 

1  . 

26.2  ) 

.CODEC  2. 

26,2  ) 

.CODEC  3, 

26,2) /l 1. 

27. 

ZOO 18/ 

000  14990 

data 

CODE! 

1  . 

27.2) 

.CODEC  2, 

S7, 2) 

,CnE  13. 

27,2) / 1  2  , 

28, 

Z00D4/ 

00014990 

DAT  A 

CODE  { 

1. 

28,  2  ) 

.CODECS. 

28,2) 

, CODE ( 3. 

28,2)  712. 

2«. 

ZOOCB/ 

00015000 

D  "  T  A 

CODEC 

1  . 

29,2) 

.CODEC  2, 

29,2  ) 

,crDF (3. 

29 ,2) /12. 

30, 

zoor.c/ 

00015010 

DATA 

CODE  ( 

1  . 

30,2) 

. CODEC  2. 

30.2) 

.CDDEC  3. 

30,2) /12. 

31  , 

ZOOCD/ 

000  15020 

D  »T  » 

CODE  ( 

1  . 

31,2) 

.CODEC  2, 

31.2) 

.CODE  C  3. 

31,2)/12, 

32. 

Z  0  068/ 

00015030 

DATA 

CODEC 

1. 

32.2) 

.CODEC  2. 

32,  2) 

•CCOC (3, 

32,2) / 1 2, 

33, 

Z0  06D/ 

000  15040 

DATA 

CODEC 

1  . 

33,2  ) 

, C00E(2, 

33.2) 

.CCDEC3. 

33. 2) /12, 

34, 

ZOOfcA/ 

000  15050 

DATA 

CODEC 

1. 

34,2) 

.CODEC  2, 

34,2) 

, CPDE ( 3 , 

34.2) /12, 

35, 

Z  0  05  R/ 

000  15060 

OAT  A 

CODEC 

1  . 

35,  2  ) 

.CODEC  2, 

35.  2) 

,  CODE ( 3 . 

35.2) / 1 2, 

36, 

Z00D2/ 

00015070 

DATA 

CODE  { 

1  . 

36,2) 

•  CODE ( 2, 

36,2) 

.CDDEC  3, 

36,2)  / 1 2, 

37, 

Z00D3/ 

000  16090 

DAT  A 

CODEC 

1  . 

37,2  ) 

.CODEC  2, 

37,2) 

,CrDE(3. 

37,2) /12, 

3  8-, 

Z0  0D4/ 

00015090 

data 

CODEC 

1  . 

38,2) 

.CODEC  2. 

36,  2  ) 

, CEDE  C  3 , 

38.2) /12. 

39, 

Z  0  00  5/ 

00015100 

DATA 

CODFC 

1. 

39,  2) 

•CODE ( 2, 

39.2) 

,CrDE(3, 

39,2) / 1 2 , 

40, 

Z  0  006/ 

0001511 0 

DAT  A 

CODEC 

1  . 

40,2) 

.CODEC  2, 

40.2) 

.CODEC  3 «■ 

4  0. 2) /12, 

41  . 

Z00D7/ 

00015120 

DATA 

CODEC 

1  . 

41.2) 

,  C  DDEC  2, 

41,2) 

•CCDEC3, 

4 1 ,2)/12, 

42, 

Z006C/ 

00015130 

DATA 

CODEC 

1  . 

42,2) 

.CODEC  2. 

42.  2) 

, CCDE  C  3 , 

4 2,2) / 1 2 • 

43, 

Z  0  06 D/ 

00015140 

DATA 

CODEC 

1. 

43.2  ) 

•  CODEC  2, 

43,2  ) 

, CCDE (3, 

43.2) /12, 

44, 

ZOOD*./ 

00015150 

DATA 

cc  DEC 

1. 

44.  2  J 

.CODEC  2. 

44.  2  ) 

♦  CEDE  C  3  • 

44,2) /12, 

4  5. 

ZOODB/ 

000151 60 

DATA 

CODEC 

1  . 

45,2  ) 

. CODEC  2. 

45,2) 

,rODE(3, 

45,2) / 12. 

46, 

Z  0  05  4  / 

000 15170 

DATA 

CODEC 

1  . 

46.  2) 

.CODEC  2, 

46,2) 

.CODEC  3, 

46.2)  /  1 2  . 

47, 

ZO  05  5/ 

000151 80 

DAT  A 

CODEC 

1  . 

47,  2  > 

.CODEC  2, 

47.2) 

»  CC  OE  C  3  , 

47,2) / 1 2, 

43, 

Z  0  05  6  / 

00015) 90 

DATA 

CODEC 

1  . 

48,2) 

. CODEC  2 , 

48,2  ) 

.CEDE ( 3, 

48.2) /12. 

49. 

Z  0  05  7 / 

00015200 

DATA 

CC  DEC 

5  . 

44,  2  ) 

.CODEC  2. 

49.2) 

.CODE  C  3, 

49.2) /12. 

50, 

Z  0  05  4  / 

0001521 0 

DATA 

CODEC 

1  . 

SO, 2  ) 

, C  ODE ( 2 , 

50,2) 

.CEDE (3, 

50,2) /12, 

51  , 

Z  0  065  / 

000  15220 

O  *  T  A 

cr  DEC 

1 . 

51.2) 

.CODEC  2. 

51.2) 

.CEDE  C  3 , 

51 ,2) /12, 

52. 

ZOOS  2/ 

00015230 

D  AT  A 

CC  DEC 

1  . 

52,2  ) 

.CODE  C  2, 

52,2) 

•  CDDEC  3, 

52, 2) /12, 

53. 

Z  0  05  3  / 

0001C240 

Dv.TA 

CODEC 

1 . 

53,  2  ) 

, CODEC  2. 

53.2) 

, C  EDE ( 3 , 

53,2)/12, 

5  4, 

Z  0  02  4  / 

00015250 

DATA 

CODEC 

1  . 

54,2) 

, CODEC  2. 

54,2) 

, CODEC  3. 

54 . 2) /12. 

55. 

Z  0  03  7/ 

00015250 

DATA 

CODEC 

1  . 

5S.2) 

, CODEC  2, 

55,2  ) 

.CODE  C  3. 

55.21/12, 

5  6, 

ZOO 38/ 

000  15270 

DATA 

CODEC 

1. 

56,  2  ) 

.CODEC  2, 

56.2) 

.CODE  C  3, 

56,2) /12, 

5  7. 

Z  0  02  7  / 

COO  1525  0 

data 

CC  DEC 

1  . 

57,2  ) 

, CODEC  2, 

57,2) 

,  C CDE C  3, 

57.2) /12, 

5  8, 

70028/ 

000  15  290 

DATA 

CO  DEC 

1 . 

58.2) 

.CODECS. 

58,2) 

,  TDE  C  3  . 

56.2) /12. 

59, 

Z  0  05  8/ 

00015300 

DAT  A 

CC  DEC 

1 . 

59,2) 

.CODECS, 

5P.  2) 

, CODE  C  3 . 

59.2) /12. 

60, 

Z  0  05  9/ 

000153! 0 

DA  Ta 

CC  DEC 

1 . 

60,2) 

, C  ODE  C  2 , 

£0.2) 

.TWO, 

60.2) /12. 

61, 

ZO  02  B/ 

000  lr320 

DATA 

CODEC 

1. 

6  1,2) 

.CODECS, 

61,2) 

, C DDE  (  3, 

6 1 ,2) /12, 

62, 

Z  0  02  C  / 

00015330 

data 

CODEC  1 . 

62,2  ) 

.CJDEC  2. 

62.  ?) 

.CCDE  C  3, 

62.2) /IP, 

63, 

Z  0  05  t  / 

000 1 534  0 

DAT  * 

CODEC 

1 . 

6  3,  2  ) 

.CODE  C  2. 

63,  2) 

•  CCDE  C  3. 

63.2) /I 2 . 

64* 

Z  0  06  6  / 

00015350 

DAT  A 

CODEC 

1  . 

64,  2  ) 

.CODECS, 

64,2) 

.CCDE (3. 

64,2) /I 2. 

66, 

Z006  7/ 

00015360 

DATA 

CODEC 

1  . 

65,  2  ) 

, C  ODEC  2. 

65,2) 

•CCPFC3. 

65,2) /10. 

20, 

ZOOOF/ 

000  1  ^37 0 

DATA 

C.C  D  0  ( 

1  . 

Co.  2  ) 

.CODEC  2, 

66.2) 

•  CCDE  C 3. 

66.21/1?, 

67, 

zooce/ 

000  15390 

DA  T  1 

CODEC 

1  . 

67,2) 

. C  ODE ( 2  , 

b7,2  ) 

.CODE  C  3. 

67,2) /12. 

6  8, 

ZOOS  9/ 

OOO  15350 

D  'T  A. 

co-pec 

1 . 

6  3,  2) 

.CODEC  2. 

68,2) 

,CCDF l 3. 

68,21/12, 

69, 

Z  0  05  B/ 

00015400 

DATA 

CODEC 

1  < 

6  9.2) 

.CODEC  2 . 

(9.2) 

.CDDE (3, 

69.2) /12. 

70. 

Z  0  033/ 

000  1541 0 

Df  T  4 

CODEC 

1. 

70,  2  ) 

.CODECS. 

70.2) 

,crr>E(3, 

70.2)  / 1  2  . 

71. 

Z  0  034/ 

00015420 

OAT  A 

CO  DFC 

1  . 

71,2) 

.  CODECS. 

71.2) 

.CODEC  3, 

71,?)/12. 

72. 

Z  0  03  5  / 

00015430 

DATA 

CODEC 

1  , 

’2,2  ) 

.CODE (2, 

72.2) 

,CrDE (3, 

72.2J/13, 

7  3, 

Z J06C/ 

000 15440 

D  AT  A 

CODEC 

1 , 

73,  2  ) 

.CODEC  2, 

73,2) 

.CCDE ( 3, 

73,2) /I 3 , 

74, 

ZOO 5  D/ 

0001 5450 

D  AT  A 

CODEC  1  , 

’4,2  ) 

.CODEC  2, 

74.2) 

•  CODEC  3, 

74,21/13, 

75. 

Z  0  04  f  / 

000  15460 

data 

CODE  C 

1 , 

’5.  2) 

.CODEC  2. 

75.2) 

,CCDE  C  3, 

75 .2) /I 3, 

76. 

Z004R/ 

00015470 

DAT  A 

CODEC 

1  . 

T6,  2  ) 

. CODE ( 2 , 

76,2) 

.CODEC  3. 

76,21/13, 

7’, 

Z  0  04  C  / 

000  15430 

D  -TA 

CODEC 

1  , 

77,2) 

.CDDEC  2. 

77,  2  ) 

, CODE (3. 

77,21/13. 

78. 

Z0  04D/ 

000 154=0 

DATA 

CODEC 

1  . 

-’6.2) 

.CODEC  2, 

78,2) 

•croF ( 3. 

7  e ,  2  )  /  1  3  , 

79. 

7 00’2/ 

000  1550  0 

D  :.t  A 

CODE  ( 

1. 

’9,2) 

, CODEC  2 , 

79,2  ) 

,rcDrc?. 

79.21/13, 

80, 

Z  0  07  3/ 

0001  510 

DATA 

O'"  DFC 

1 . 

°0,  2  ) 

.CODEC  .2, 

60.2) 

.CEDE  C  3, 

?0.2)/13, 

ei , 

Z0  0’4/ 

00015520 

data 

CODEC 

1  . 

61,2) 

.CODE  C  2, 

8  1.2) 

.CODE ( 2 . 

e 1,2) /13, 

82, 

Z  0  0’5/ 

00015530 

DATA 

CODEC 

1 . 

02,2) 

,C CPEC 2, 

62,2) 

, r r  DE ( 3 , 

32,2) /I 3. 

83, 

Z  0  07  6  / 

0  00  1554  0 

DAT  A 

CODEC  1, 

5  3,2) 

, C  ODE (  2, 

63,2  ) 

, CC  DE  <  3  , 

83. 2) /I 3, 

84, 

7  00-7/ 

000  15550 

DaTA 

CODEC 

1 . 

F  A,  2  ) 

.CODEC  2. 

64,2) 

, C  DDF C  3, 

34,2)/l3, 

8  5, 

7  00 52/ 

C  00 1 5  56  0 

D  \T  A 

CO  DEC 

1  . 

85,2  ) 

.CEDE ( 2, 

65.2) 

,C  CDF C  3, 

95 .2) /I 3, 

86, 

Z  0  05  3  / 

000  1^570 

DATA 

CODEC  1  , 

°6,2  ) 

.CODEC  S. 

8  6,2) 

.CEDE  C  3. 

66, 2)  /  1  3, 

67, 

Z  0  054 / 

000  15580 

DATA 

'■CDEC 

1 . 

e7, 2 ) 

.CODEC  2, 

67,2) 

.CEDE  C  3, 

87,2) / 1 3 , 

88, 

Z  0  Oc  5  / 

000 1 5590 

DAT  A 

CODEC 

1 . 

68.2) 

.CODE (2. 

ee ,  2  > 

.CCDFC  3. 

63. 2) /13, 

8  9, 

Z  0  05  A  / 

000  15600 

DA  TA 

CODEC 

1  . 

F?  ,2  ) 

.CODEC  2, 

69,2) 

.CEDE  <  3  . 

89,21/13, 

9  0, 

Z  0  05  8/ 

000  15  61  0 

DAT  A 

CC  dec 

1 . 

r  0.2  ) 

.CODEC  2. 

ro.  2) 

.CDDEC  3, 

90.2)  /  1  3  , 

91  , 

Z  0  06  4  / 

00015620 

Ot  T  A 

CODEC 

1 . 

cl,?) 

, CODE  C  2 . 

9  1.2) 

.CODE C  3. 

9  1  ,  2  )  /  1  3, 

c  3, 

Z  0  065/ 

00015630 

DC  T  A 

DO  DEC 

1 . 

9  2,2) 

.CODEC  2, 

9  2.2) 

.CCDE  C  3  . 

92,2) /13, 

9-3, 

Z  0  00  3  / 

00015640 

OAT  A 

CODED 

DC  1 

.  1  )  ,  CODEC. DC  2, 

1 ) ,CODEc o( 3, 1 >/  4.5.Z1/ 

000  1565  0 

D'-TA 

CC  DE¬ 

DC  1 

.  2  )  ,  C 

O1  DEO D (  2, 

S )  .’roFFD C3 ,2  )  /  3.4.Z1/ 

000 15f  5  0 

DATA 

CODES 

D  (  1 

,  3  )  ,  C 

LOE-.DC  2, 

3 ) , CCDE'DC 3 , 3  )/  1.2,21/ 

00 0  l'-f  ’O 

d  ;■  t  « 

CC  0  E“ 

DC  1 

.4)  ,C 

CDE7.DC  2, 

4  ) .CCDEt DC3.4  >/  3  »  ’  »  Z  3/ 

000  156?  0 

DATA 

CCDEC 

DC  1 

•  5  )  ,  C 

ODcrADC  2, 

5) ,rCDE9DC 3 ,5 ) /  6,6,Z3/ 

000156=0 

D  T  m 

code’s 

DC  1 

,  6  )  ,  C 

COE'  D  (  2  , 

6  )  ,rOne'- DC  3 ,6  )/  7,0,23/ 

000  15700 

D  f  TA 

CO  D'; 

DC  1 

.  7)  ,  C 

ODE)  DC  2, 

7 )  , -DDE9D C 3.’ )/  3.1.Z2/ 

0001 571 0 

DAT  A 

CO  D  FT 

D(  1 

,  3  )  «  C 

DPCr.DC  2, 

P ) , CC  0F9  D  <  3 , B  )  /  6.6.Z2/ 

0001c7?0 

D  •  T  A 

C"  DE= 

DC  1 

) ,: 

C  DE-  DC  2, 

9 ) , -DDEFn ( 3 ,c )/  7.10.Z2/ 

000  1  5 ’ 3  0 

DATA 

CC  DOS 

DC  1 

.  10  ). 

C  C  DErP  C  2 

,  10  )  ,CrPE«"D(3, 

10)/  13.11 

.  Z3  / 

000 1 r  7  4  0 

J  ,  T  A 

ccor- 

DC 

,ii). 

C  CJOCD ( 2 

,11) , CPD  EF  D  C 3, 

11)/  13.12.ZS 

/ 

000  15750 

00015760 

F  N 

3 

0001r’70 

0  £  N'T  Dr  DCCC  INT  PJ^GF  .'.M  LINES  POINTED*  53  =  1 


d-n 


UNCLASSIFIED 


nnon  n  no-n  ^no^ri  o>nnnr, 


JNCL*SS  IFIED 


STA'.T  OF  nccC  J —  TNT  PTS^'M  DSN  '  MF  =  MO  0  06  •  CO  o  ELM.  FG '  T 

S  JTif  ~  UT I N  c  ' - T L"(  P.'L  /  r  i '"r'rL  ct  ,  :tv.t  s  ,fr  ce  ) 

<2/  14/vo  me d  pissing  r'T'^T1;'  -  r~PF> 

<  2/  14/dO  -‘PPED  I  'I  T  3  5t-  F.  C C  DE  (3,E2,2)> 

<2/U/'C  DE  L  E  T  E  1  CCVHC'i/H  JFr /rr3C(  ?  ,c2  ,  ?  )  ,rODE(  2.  1  1  )> 
<2/14/30  ^ELTTCO  y  v/^cc-pi;  j  10040  1) 

ILLICIT  !'•  TFGER  (  »- Z  ) 

I  NT  =  3=7  CCOE(  2.  S?  .  2  ) 

CCMMCM/DUFF  /=  EL  EJF(  c.  0 , 2  )  .  CDCJFI  240  1  ,CT9'JF  (50,2)  , 

*  ST=E JF( 2 4 0) , STP 7 ( 3000 ) 

********************************  a  FG  I  N  ?rnr>  F  AM  ************** 

tntt:al:ze  make  jp  m-ke  JP  C00r  LENGTH 

MCC  0E  =  0 
VLSNG=0 

CHECK  IN°UTS 

IF ( DLL’ 5.L7.1  <?• POLAR. GT. 2 1  C  # LL  F  X  T  T 

I F  (  L  S NOT  H  .L T  •  0  »  Dr  »  _  EN NT  H»  3T .172° )  r?Ll  EXIT 

IF(  LENGTH.LE.63  >  GO  TC  10 

CALCULATE  MAKE  UP  CCDC  INDEX,  CEDE.  L  F  N  G  T  H 
'  NO  I  TE  TC  crnr  LINE 


1 NDEX=LEN GT  H/F4+F4 

•*C'  D  E  =  1 1  ’  D  E  (  2,  INDEX,  Df'L'.P) 

HLPNG=CFDE(  1.  INDEX, °EL  *  9 ) 

CALL  MI2E  <NC0np,r03DF.  CDE1 

CDELCT=COEL  CT  +  '/LENG 

CDD4TA=CPDAT4+MLENG 


, ML ENG ) 


C  *  L  C  JL  AT  c  TFPMTNPT’NG  CEDE  INDEX.  CEDE,  LENGTH 
AND  t DD  TC  CODE  LINE 


10  CCNTINJP 

I N D E  X=  ML'D  (  L  EM G T H  ,  6 4  )  *  1 
T  C  C DE  =  CC  0 E (  3,  INO-X,  PC.LAP.) 

TLE NG=C OD E <  1  ,  *  \7>EX,  PQL-R  I 
C  ALL  Ml 2P (T  CD  Or ,0 03UC . CDELC  T  +  l  , TlENG ) 

C DEL C  7-  CO>f_  CT  +TLENG 
CDD-TA  =  CDD:  T'  +T le‘-3 
c 

return 

F  M  0 

0  END  CF  DCEC  J’f  ITT  PRC  GF  AM  LINES  PPTNTED=  * c 


000  0001  0 
00000020 
000  00021 
00000022 
000  0002  3 
0000002  A 
POO  Of  0? r 
00000030 
0000004  0 
00000050 
00000050 
0000003 0 
000  oo 02  0 
00000130 
OOOOCl 1 0 
00000120 
000001  3  0 
000  OC 14  0 
000  00150 
000  OP  1 5  0 
00000170 
000  00 1  ?  0 
000001 90 
000  002  00 
0000021 0 
000  00220 
O00  00230 
000  0024  0 
000  00  25  0 
000  00250 
000  002‘70 
000  002°  0 
000  0029  0 
000  0030  0 
000  0031  0 
00000320 
00000330 
000  0034  0 
00000350 
000  003  SO 
000  OC  37 0 
00000330 
000  003=0 
00000400 
0000041 0 
00000420 
00000430 
000  00440 
00000450 


C  -if 


IMT L-S S  ?•"  !  CD 


UNCL4SS IF! ED 


START  CF  DCEC  U=>r.  INT  PROGRAM  DSN  *  ME=  N 0 0  26  •  E~  r  MS S.  FORT 

SUBROUTINE  EERMES<  o  EL3  UE  .  "TauF  ,  orLMf  X  .  VRES,  ERRC  FT , D I  A G)  000  00  01  0 

C  00000020 

C  <2/14/00  *ODED  pa.SSI'-'G  pA'V.METfp  -  DT«G>  00000021' 

C  <2/14/50  DELETED  2  D  M  MC'i  4/L  DG  I  C  /  SE f  RC  H  ,  D  T  »  G>  00000022' 

C  <2/14/30  CHANGED  L3G1C..L  5E/.rCH,0PG  TO  L  CG  I  CAL  DIAG>  C0000023 

C  00000024; 

IMPLICIT  INTEGEP(A-Z)  00000030,1 

RE<L  ESF  00000040’ 

r»*»****  LABELED  COMMON  /G32BIT/  *******  00000050 

C  00000050 

COM VON  /S  32  91  T/M«  S< ( 32 )  .COMASK  (32 >,LIBIT(32).LZeiT(32)  00000070 

INTEGER  MASK, CD M A S < . L 1 Q I T , L Z B I T  00000030 

C  000000?0 

C ♦ ***************  *******  FILE  DEFINITIONS  ********************  000001 00 

C  0000011  0! 

C  C.  1  MON /F I LE S/TERM.LPFIL.PELFI L.OTFIL.ERFIL  00000120 

C  000001  3  0 

DIMENSION  p  EL  BUF ( 6  0  )  ,  ,'TeUF(60)  00000140 

LOGTCAL  DIf G  00000150 

C  00000170 

Z  **************************  *  3EGIN  OPDGRiM  ** *  **************************  0 0 0 0 0 1 S 0 
C  000001=0 

REMIND  1 
R  E»  1NO  2 
enRCr,=o 

"TEL w  =  ( PE  LM ' X  +  32— 1 )  /3  2 
OTLNCT  =  0 


C 

c 

c 


c 

c 


READ  a.N  ERROR  FREE  LINE 
100  CONTINUE 

RE  AD  (  1  ,  rN  0=  50  0  ,  E=  E=  SOO  )  I  ML  N  NIC  .  I  NFL  F  T  ,  PEI  BUF 
IF  (  MCD(  I  NLNNO-1  .  VRES  ).  NE.O  )  GO  T  0  '.00 

r  EAO  AN  ERRC-CO"  ~UaT  ED  LINE 

20  0  CENT  IN J E 

RE  ID  (2  ,  END=  50  0,  ERR  =  POO  )  C  TLNNO .  CTEL  CT  ,  "TBUF 
CTLNCT  =  C 
300  CONTINUE 

:r  UN  T  o : 


:  E  I  VE  D  L’NES 


DC  450  1=  1  ,"T'-L« 

TF(-TPJF(T)  .EO.=EL3JFO)  GC 
I  P(  .NCT.DIf  G)  ~>C  TO  42  0 

«R  I  TE(  6. 4  1  0  )  1  *'L,-,M:  ,  C  TLNNC,  I  ,  PEL°UF  (  !  )  ,  DTBUF  (  I  1 

410  F0FM*T(3le,2Z12> 

420  CONTINUE 

DC  440  J= 1 . 32 

ip  (  143  (  "  TBUF<  I  )  ,  J  ,  1  )  •  '  ’E  ,  I  4f;  {  FEL  PUF(  I  )  ,  J,  1  )  >  F"' 

440  CONTINUE 
450  FCMINJF 


+  ] 


C 

C 

C 

c 


c 

c 

c 

c 


<2/?3/°0  CM  AN  GF  D  300.1  00.550  T" 
IF  (  C  TL'»n:  -  I  NLV’  L)  2  0  0,  100,430 


200 ,  1  CO, 450> 


<2/=n/=0  DO-5  NEXT  2  LINES> 

4  3  0  RP  D(  1  .  E\  D=  F-0  0,  EE  E  =  50  0  )  I  NLNNR,  JNFLCT  •  PEL  DU  F 
IF ( MED ( 'ML N ND-1 , V" ES ) . NE .0 )  GO  TC’ 430 
G'  T 3  300 

ETC-'  LINE  NJMPFf  "r  I  ’  TE  THIN  GPCR  L  T  N  F  NIJMBEP; 
rrJNT  0 T PFPREN" ES  OETwEE  i  COOP  AND  'LL  »HTTF  LINE 

50  0  CONTINUE 

DP  550  1=  1, CTrL  w 

IF ( PEL 3JP (T  1.EG.0 )  GL  TO  550 
iFl.TT.njr  G)  G~  T  3  52  0 

HR  T  TE  (  A  ,4  10  )  I  NL’-Jx;  ,  GTLNNO,  !  ,  R  E  LnUF  ( 

C  r :  t  I v  JE 
DC  540  J= 1 . 32 

IF  (  !  4P(  -  ~L  :3  JF  (  I  )  ,  J,  1  )  .NO.  0  I  c  'Cr  =  Ir''r  ”r  M 

C r;.  7  Z  JUE 
C  ON  TIN  JE 


)  , CT3UF ( T  ) 


520 


54  ) 
pp  7 


RE"  C(  1  ,  r*-D=<  0O.C“"  =  SC0  ) 
IF  (  VCD(  T  NLNNO-1  ,  V‘  ES  )  .  N! 

<2/2F/"'0  CM4fl',cO  O: 

G"  T*  500 


‘I L  V*  -  ,  I  ’EL  C  T  ,  TLBUF 

. o)  or.  tc  5 no 


3  0  0  T  ; 


00000200 
00000210 
000  0022  0 
000  00230 
000002  4  0 
00000250 
00000250 
0000^270 
009  0C23  0 
000  002  =  0 
000  0030  0 
0000031 0 
00000320 
00DC0330 
00000340 
00000350 
000  OC  350 
000  CO  37  0 
000  003=  0 
000003=0 
00000400 
0000041 0 
000  004?  o 
000 00430 
0000044  0 
00000450 
000  00450 
ooo  or  47  o 
000  004E  o 
000  004  =  0 
COO  00500 
0000050 1 
00000502 
0000051 0 
0000051 1 
000  0051  2 
OOO  0051  4 
00000  5)  5 
0000051  f. 
COO  0053  0 
00000530 
00000540 
00000550 
00000550 
OOOOOF’O 
00000550 
000005=0 
00000500 
000  0051  0 
0  00  00  *-  =  0 
007  OOF  3  0 

000  00(  4  0 
000  00  F E  o 
0  0  0  0  0  t.  5  0 
OPOCCfT; 
000  OOF  3  0 

0  0  0  0  0  F - o 

04000' =3 
00007700 


JNCLA3  5  IF?  ED 

C-\l 


AD-A092  395 


unclassified 


DELTA  INFORMATION  SYSTEMS  INC  JENKINTOKN  PA  F/&  17/2 

MEASUREMENT  OF  COMPRESSION  FACTOR  AND  ERROR  SENSITIVITY  FACTOR  — EtC(U) 
AUG  80  S  URBAN*  R  SChAPHORST  DCA1OO-0O-M-O145 


NCS-TIB-80-6 


UNCL»  SSIC I S  3 


ST/  R  T  CF 

DCEC  UP-INT  PROGRAM 

DSNA  ME* R 380  2 • MI2 E.ASM 

TITLE 

•MI2P  -  61  T  STUFFING  !‘CUTTNE* 

00001030 

WI  2b 

C  SEC  T 

00002030 

SPACE 

00003030 

* 

THIS  ROUTINE  ST2r.ES  THE 

NP  LOW-ORDER  BITS  OF  THF  *Or  3 

00004000 

* 

IVAL  I 

N  THE  ’.=  r<*Y  13a.  ST/RTIMG  Wl^H  GIT  JB.  J3  MAY  BE 

00005000 

* 

AR3I TR  A-  IL  V  LAPSE. 

00005000 

SPACE 

00007000 

* 

CALLING  SEQUENCE  — 

ooooeooo 

S=ACE 

00005000 

* 

SPACE 

C  *  LL  MI2B(  IVAL. ISA 

. JB.NB) 

00010000 
00011 000 

SAVE 

(14,?).,* 

00012000 

USING 

MI  23  ,  5 

00013000 

LR 

5.  15 

LOAD  BASE  PFGI STFr 

0  00 1400  0 

LA 

15  ,SA 

SUP  SAVE  AREA  AODRESS 

00015000 

ST 

13.SA+4 

SAVE  CALLERS  ADDRESS 

00016000 

ST 

15  ,8 ( « 1 3  ) 

S«VE  nURS  IN  CALLERS 

0001^000 

LR 

13.15 

R13  NOW  POINTS  TO  OURS 

00018030 

LM 

1, 4, Of  1  ) 

*.(  IVAL,  IB'  .  JB,  NB) 

OOOIEOOO 

L 

3, 0( ,3) 

JB 

00020090 

LT  5 

5.  3 

J3-TH  BIT 

00021000 

FN3 

ABEND?  0 

NEGATIVE.  STOP  10 

00022000 

00023030 

8CTR 

3.  0 

JB-1 

N 

3, =XL4 • 1 F» 

0-31 

00024933 

SPACE 

00025000 

* 

DETERMINE  WCRD  3CUNDAFY 

F3?>  64-81 T  WORD  TO  LOAD 

00026030 

SPACE 

00027000 

PCTr 

5.  0 

JB-1 

00026000 

SRL 

5,  5 

( JB-1 )/32 

0002°000 

SLL 

5,  2 

( ( JB— 1 )/32 )  *  4 

00030000 

LA 

2. 0<  5.2) 

FIRST  WORD  IN  IBA  OF  PAIR 

00031030 

L  * 

6.32 

00032000 

S 

8,  0(  .4) 

32  — NB 

00033000 

BM 

A8  EN  D2  0 

NP  >32 

0003*000 

C 

P, =X  L4 • IF* 

NR>0? 

00035000 

3H 

A  3  END2  0 

NO.  ERROR 

00036030 

L 

4, o< . n 

IVAL 

00037000 

LM 

5.  6.  =E  •  0.  -  1  • 

SECOND  WTRD  FOP  DOUBLE  SHIFT 

00038000 

SRL 

6.  0( 8) 

NR  CNE-BITS 

00030000 

SLL 

6. 0(8  ) 

LErT  JUSTIFIED 

00040000 

SLL 

4,  0(  8) 

IV*L  LEFT  JUSTIFIED 

00041033 

LM 

0, 1.0(2) 

TWO  WORDS  OF  IBA 

00042030 

LM 

7,  8.=P'0,-1* 

MASK  and  flipper 

00347033 

S  POL 

6,0(3) 

SHTFT  MASK  BITS 

0004*030 

SPDL 

4. 0( 3) 

IvaL  BiTS 

00045000 

XE 

6.  8 

FLIP  MASK  BITS 

000*6033 

Xf< 

7.8 

0=1,  1=0 

0004^000 

MR 

6.  0 

GET  NON-CHANGER  BITS 

00048000 

UP 

7.  1 

FROM  IRA 

00049033 

or 

6.  4 

AMD  COMBINE  WITH 

00050000 

OR 

7.  5 

T  VAL 

0005! 900 

STM 

6. 7, 0(2 ) 

SAVE  CHANGED  WORDS  BAC<  I  *> 

13! 

00052030 

L 

13. SAM-4 

00053000 

RETJPN 

(1.9) 

00054000 

SPACE 

00055030 

* 

7MVAL! 

D  CCUVT  F;s  Nd  (NEGATIVE,  MORE  THAN  32)  OR  JB  (NEC, 

«  TIVE) 

00056 030 

SPACE 

00053030 

AEEND20 

AdEND 

20 .DUMP 

00056030 

S  / 

or 

15F*  O' 

0005C030 

END 

0006C033 

0 

e-Kjn 

C  F  OCEC  U  3  E  I  N  T  pr: 

GRAM  LINES  PRINTED* 

SO 

UNCLASSIFIED 

<l'Z\ 


UNCL*  SSI'IEO 


ST*.' T  nF 

OCET  U»I1'4T  P^rGCTM 

DSN*  Mgs r 33 02 ,14  9 ,» SM 

title 

• I 4B  -  FT T  EXTRACT! 

rw 

FCUT I NF  * 

00001 030 

I4B 

C  SEC  T 

00002000 

SPACE 

00003050 

* 

THIS  ? 

rjTINE  ACTS  AS 

t  N  ! 

NT E GE 3  F'JNCT’ON.  FETCHING  (IN  R 

ECO  ) 

O0004000 

* 

;  bit 

ST  "  X  kl  G  ,  ZEf.r-FlLLEO 

,  r F  LC»'G TH  f.f»,  ST*FTI*'G  -T  THE 

J?-Th 

00005000 

* 

HIT  CF 

APR  AY  ’ ? A.  JD 

Vi  AY 

BE 

ARBITRARILY  lafc-e. 

00006000 

S3  *  CE 

0000T0  00, 

* 

Calling  sequence  — 

0  00  0*003; 

SP  ACE 

oooofooo; 

* 

SPACE 

NP  ITS  =  TABUSA 

.  JB, 

NB) 

00010000 
000  11  05  0> 

SAVE 

(14,5),,* 

000125501 

US!  ’*6 

UB.S 

000  13000; 

LR 

5.  15 

LEAD  BASE  REGT STEF 

0001*05  0* 

L* 

15. S* 

CJP  S'VE  <  R  £#  ADDRESS 

000150551 

ST 

13. SA A4 

SAVE  CALLERS  ADDRESS 

00016050 

ST 

15  ,3( .13) 

S  *  VE  OURS  IN  CALLERS 

oooir 050 

LR 

13.15 

?13  vn W  pc  INTS  TC  nuns 

OOOISOOO 

LM 

1.  3.  0(1) 

A(  !Pi  .  JP.NB) 

0001r000 

L 

2,0<  .2  ) 

JQ  -  LC-ATI^N  CF  BITS 

00020C00 

LTK 

4.  2 

JD-TH  BIT 

00021000 

9  HP 

A3EN010 

NEGATIVF,  ABEND  10 

00022000 

bctc 

2.  0 

J5-1 

00023000 

N 

2.=XL4«1F* 

0-31 

00024000 

SPACE 

0002*000 

« 

OcTERM 

:NE  w:RD  3CUNDAFY  FCK 

64—3 1 T  WORD  TO  LCAO 

00026000 

SPACE 

0002r000 

9CTW 

4,  0 

JF-1 

P002PO0O 

SRL 

4,  5 

( JB- t )/32 

O002F00  0 

SLL 

4,2 

(  (  JB- 1 >/ 32  1  *  4 

000  30000 

L 

0, 0( 4, n 

FIRST  WCPD 

00031000 

L 

1.4(4,1) 

SECOND  WORD 

00032000 

SLDL 

0,  0(  2) 

SHIFT  OUT  HtGH-CRDER  GARBAGE 

00033000 

LA 

2,  32 

COMPUTE  ®E  SI DUAL  NUMBS ~  TO 

S-r  FT 

0003*000 

c 

2. 0(  ,3) 

32-NB  T"1  SHIFT 

00035000 

eM 

A9END10 

N9>32 

00036000 

r 

?.=XL4« 1=* 

NF  >0? 

00037000 

3H 

/ 3  FN  DIO 

NS,  ERROR. 

OOP  3603  3 

SPL 

0,0(2) 

RIGHT  JUSTIFY 

OOC3SOOO 

L 

13  .S*  T4 

00040030 

RET JRV 

(  1.5) 

rsTUPN  WITH  VALUE  t A!  ~E3  0 

00041000 

SPACE 

00042000 

* 

INViLID  CTUNT  F^r  N9 

(N£G 

ATIVF,  MPFE  TH*N  3?)  CP  JP  (NEGATIVE) 

000*3000 

SPACE 

0004*030 

aEENOIO 

ABEND 

10. DUMP 

00045000 

S  A 

DC 

1 SF • O • 

00046330 

END 

00047000 

0 

END 

r-  DCEC  UP R I NT 

ppcgfam 

LINES  PRINTED*: 

47 

UNCL*  35ICI:3 


r*'"*c'<D  r\nn  nr»D  r»oo  n<vi  non 


UNCLASSIFIED 


STATT  OF  DCEC  UFr  INT  PROGRAM  DSN' ME=N0026«STA TS »FOF T 

SU3RnuTINF  ST»  TS( LENGTH. 1 NLNCT ,DI#G ) 

TM=LIC*T  INTEGE=(A-Z) 

C 

INTEGER  MTT<5  ), TTT<  3*5)  « LENGTH!  INLNCT) 

RE/L  STT ( 2, 5> « SUM,  SUMSO 
LOGICAL  DT*G 

C*** *********** A A ****** *  FILE  DEFINITIONS  ******************** 

COMMCN/FILE S/TFf.M  »  _PF I L  «  PFLF  I  L  «  CTF I L  »  FPFX  L 
DATA  mtt/O.  24.49,  96. 1<?2/ 


OOOOOOIO 
00000020 
000 000*0 
00000050 
000000*0 
00000070 
00000090 
000000901 
00000100; 
000 0011 0; 
00000120 


000001 30l 

*********  ***************  BEG  IN  Pc"?Gr'J  ********************************  ***000  00 1*0; 

00000150 

call  a<sn^ t (lfngth. i . i , i , inlnctj 

DO  300  1*1,5 


ITT(1, I  1=10000 
I TT (2 • I  1*0 
sum=o« 

SUM  SQ-0 • 

DO  100  J* 1,1 NLNCT 

find  FILLED  LINE  LENGTH 

L5H=M AXO ( LENGTH! J )  ,  MTT (Ill 
IF(oIAG)  W ITE(TFOM, 50)  LEM 
50  FORMAT (18) 

FIND  MINIMUM  LINE  LENGTH 

ITT(  1,1  )*MI».’0!LEN,1TTC1,1  1) 

FIND  MAXIMUM  LINE  LENGTH 

ITT  (2,!  )  =  MA  X0( LEN,  I  TT( 2,  I  )) 

FIND  SUM  CF  LENGTHS 

SUM*  5UM+FLC *T( LEN ) 

SU  MS  0*3UMS0  * ( cLOA  T(  LEN )  )  **2 
100  CONTINUE 

FIND  MEDIAN  LTNF  LENGTH 

MED  I * I NLN  CT /2 

ITT(  3.1  )**.*  XO (  LENGTH (MEDI  1  , MTT (  I  >  ) 

FIND  SAMPLE  *C'N  «ND  STANDARD  DEVIATION 
STT  <  1  ,  T  )* SUM/FLO'  T(  INLNCT  ) 

STT  (2,  !  )*S3RT  (  (  SUMSQ-  (  SUM**  2  >  /R  LPA  T  I  I  NLNCT)  )/FLC*T(  INLNCT -l  )  ) 
300  CCNTINJE 


*RITE (6. 4 00 )< *TT( I , I ), !=1 ,5) 
40  0  FCPM.4TI 


*  *0 

*'  CC3ED  LINE'/ 

**  length 
*•  statistics:*// 

*•  MINIMUM' , 10X.5I !£)//} 


00000150 
000  0017  OL 
000001501 
00000190. 
00000200? 
000  0021  0| 
000  00220? 
0000023  01 
00000240 
00000250. 
00000250 
00000270: 
00000230 
000002=0 
00000300 
00000310 
00000320 
00000330 
00000340 
00000350 
00000350 
000 00370 
00000390 
000003=0 
00000*30 
0000041 0 
000 00420 
00000*30 
00000440 
00000450 
00000450 
OOODO^O 
00000*90 
000004=0 
00000530 
0000051 0 
00000520 
C0000530 
000005*0 
00000550 
00000550 
00000570 


•  KIT  =  (6.410  )( ITT!  2,  J ) ,:  =  1 ,5) 

410  F DTM  *  T ( 

*•  M<  XIMUM ' , 1  OX, 5(16) //) 
*=:TE(6,414)(*TT(3.I>,I*1,5) 

415  FDA  m  #  T < 

*•  M  ED I  *  N  *  , 10X, 5(  1 3)//) 

WRIT* (6,4  20  >( STT<  t , i ) , 1*1 .5 ) 

420  FORM  4T  < 

*•  SAMPLE  mean*  ,  =X, 5(Ffi,2)// ) 

MR J  TEf  6,4  30  M  STT (  2, I ) , I *1 ,5) 

430  FC  BM AT ( 

*•  ST  ’  ND  Ar  0  DEVI  AT  IC  i.'  ,2X,5(  F3,2  )  ) 

RETURN 
S  N  D 

S(D  fF  DCEC  U’M'JT  FRCG^A* 


MINIMUM  TRANSMISSION  TIME  (4*00  M»S) • //00000550 

000 0055 0 

0  MS  5  MS  10  MS  20  MS  *0  MS*/  00000*00 

030 OOf 1 0 
00000620 


LINES  PK'NTED* 


76 


00300530 
00000640 
00000650 
00000650 
00000670 
093  00?  3  0 
000006=0 
00000790 
0000071 0 
00000720 
00000  ■'39 
000007*0 
00900750 
90000760 
090907*0 


C-2& 


UNCL'SS IF  ISO 


